www.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