根据 Born 和 Wolf 的 Principles of Optics 一书中1.3节的描述，以及 Fig1.5 ，可绘制出波包曲线如下：

图1  波包曲线图

具体程序为：

t=-5:0.01:5;

a=0.1;

y1=2*a.*cos(0.5*(2*t));

y2=-2*a.*cos(0.5*(2*t));

y3=2*a.*(cos(0.5*(2*t)).*cos(10*t));

plot(t,y1,'--k',t,y2,'--k',t,y3,'-k','LineWidth',2);

line([-5,5],[0,0],'Color','k','LineWidth',1);

xlabel('\itt','FontName','Times New Roman','FontSize',20);

ylabel('\ity','FontName','Times New Roman','FontSize',20);

title('Wave Group','FontName','Times New Roman','FontSize',20);