编写packet_loss_rate.m，计算丢包率：

好的，以下是一个简单的 MATLAB 函数，可以计算出从源地址发送到目的地址所传输的数据包中的丢包率：

function loss_rate = packet_loss_rate(source_ip, dest_ip, num_packets)
% source_ip: 源地址
% dest_ip: 目的地址
% num_packets: 发送数据包的数量

% 创建一个 UDP 客户端
udp_client = udp(dest_ip);

% 设置超时时间为1秒
set(udp_client, 'Timeout', 1);

% 连接到目的地址的UDP端口
fopen(udp_client);

% 初始化发送的包的数量和丢失的包的数量
sent_packets = 0;
lost_packets = 0;

% 发送数据包
for i = 1:num_packets
    fwrite(udp_client, i);
    sent_packets = sent_packets + 1;
end

% 等待所有数据包的响应
while sent_packets > 0
    try
        % 读取响应数据包
        packet = fread(udp_client, 1);
        sent_packets = sent_packets - 1;
    catch
        % 如果超时，则认为数据包丢失
        lost_packets = lost_packets + 1;
    end
end

% 计算丢包率
loss_rate = lost_packets / num_packets;

% 关闭 UDP 客户端
fclose(udp_client);
delete(udp_client);

该函数使用 UDP 协议向目标地址发送数据包，并等待响应。如果在超时时间内未收到响应，则认为数据包已丢失。最后，该函数计算出发送的数据包中的丢包率，并返回该值。