作业帮【求助】【急】求高手知道Matlab编程,利用函数分析法画阻尼振动曲线
来源：学生作业帮 编辑：作业帮 分类：综合作业 时间：2024/05/21 09:09:41
【求助】【急】求高手知道Matlab编程,利用函数分析法画阻尼振动曲线
试利用函数近似法画出当β=0.1、ω0=1、t=0时,x=1.0、v=0、0＜t＜25、Δt=25/1000下的阻尼振动x-t曲线.
弹簧振子的阻尼振动满足的方程
试利用函数近似法画出当β=0.1、ω0=1、t=0时,x=1.0、v=0、0＜t＜25、Δt=25/1000下的阻尼振动x-t曲线.
弹簧振子的阻尼振动满足的方程
哎,老了,matlab生疏了.
哥们啊,我一个心血来潮给你认真了一个下午才弄出来的,要求追加分数!
程序代码如下：
beta=0.1;
w0=1;
delta_t=25/1000;
t(1)=0;
for i=1:1000
t(i+1)=delta_t*i;
end
threshold=0.9;
x(1)=100; %为了求解方便,最后再更改比例尺
temp_v1=0;
n=1; %x的角标
for i=1:1000
for j=-100:0.001:100
temp_x=j;
temp_v2=(temp_x-x(n))/delta_t;
temp_a=(temp_v2-temp_v1)/delta_t;
if abs(temp_a+2*beta*temp_v2+w0^2*temp_x)
哥们啊,我一个心血来潮给你认真了一个下午才弄出来的,要求追加分数!
程序代码如下：
beta=0.1;
w0=1;
delta_t=25/1000;
t(1)=0;
for i=1:1000
t(i+1)=delta_t*i;
end
threshold=0.9;
x(1)=100; %为了求解方便,最后再更改比例尺
temp_v1=0;
n=1; %x的角标
for i=1:1000
for j=-100:0.001:100
temp_x=j;
temp_v2=(temp_x-x(n))/delta_t;
temp_a=(temp_v2-temp_v1)/delta_t;
if abs(temp_a+2*beta*temp_v2+w0^2*temp_x)