gusucode.com > matlab通信工程仿真源码（张德丰等编著）程序书籍 > matlab_code/matlab通信工程仿真源码（张德丰等编著）/第3章/li3_20.m

    clear;
t=0:0.01*pi:2*pi;
p=[1 2 4 10];
for n=1:4
    eval(['T=p(n);']) %T依次等于数组p中的数值
    y=sin(T*t);
    subplot(2,2,n) %按顺序选择4个子图进行绘图
    plot(t,y)
    title(['y=sin(',num2str(T),'*t)'])
end