有阻尼单自由度系统，分别设阻尼比为1, .707, .25, .1,.01，绘...

wrj001

有阻尼单自由度系统，分别设阻尼比为1, .707, .25, .1,.01，绘制幅频特性图

1 生成一个序列，命名afr
afr:=seq(1/sqrt((1-(r)^2)^2+(2/10*zeta*r)^2),zeta=[1, .707, .25, .1,.01]);
2 画图，可以加窗口view[0..5,0..4]
plot([afr]);

file:///C:/Users/user/Desktop/afr.png