pcapngObj = pcapngWriter('FileName','sample');

interface = '5GNR';                                       % Interface name
linkType = 113;                                           % Link type of SLL packet
timestamp = 300;                                          % Timestamp
interfaceID = writeInterfaceDescriptionBlock(pcapngObj,linkType,interface);

payload = [59; 205];                                      % MAC subPDU (contains truncated buffer status report (BSR) control element)
radioType = 1;                                            % Frequency division duplexing
linkDir   = 0;                                            % Uplink packet
rntiType = 3;                                             % Cell-RNTI
startString = [109; 97; 99; 45; 110; 114];                % Tag to indicate start of NR MAC signature
payloadTag = 1;                                           % Payload tag for NR MAC packets
signature = [startString; radioType; linkDir; rntiType];
macNRInfoPacket = [signature; payloadTag; payload];

udpPacketLength = 8 + length(macNRInfoPacket);            % Length of header (8 bytes) and payload
udpHeader = [163; 76;                                     % Source port number
    39; 15;                                               % Destination port number
    fix(udpPacketLength/256); mod(udpPacketLength,256);   % Total length of UDP packet
    0; 0];                                                % Checksum

ipPacketLength = 20 + udpPacketLength;                    % Length of header (20 bytes) and payload
ipHeader = [69;                                           % Version of IP protocol and priority or traffic class
    0;                                                    % Type of service
    fix(ipPacketLength/256);mod(ipPacketLength,256);      % Total length of the IPv4 packet
    0; 1;                                                 % Identification
    0; 0;                                                 % Flags and fragmentation offset
    64;                                                   % Time to live in seconds
    17;                                                   % Protocol number
    0; 0;                                                 % Header checksum
    127; 0; 0; 1;                                         % Source IP address
    127; 0; 0; 1];                                        % Destination IP address

sllHeader = [0; 0;                                        % Packet type
    3; 4;                                                 % Address resolution protocol hardware (ARPHRD) type
    0; 0;                                                 % Link layer address length
    0; 0; 0; 0; 0; 0; 0; 0;                               % Link layer address
    8; 0];                                                % Protocol type

packet = [sllHeader; ipHeader; udpHeader; macNRInfoPacket];

packetComment = 'This is NR MAC packet';                  % Packet comment
write(pcapngObj,packet,timestamp,interfaceID,'PacketComment',packetComment);