|
clear all
fun=inline('[y(2);sin(w*t)-2*y(1)-3*y(2)]','t','y','flag','w(i)','i');
tsp=[0 10]; y0=[1 1]; w=[5 6 9 5 2 6 1 5 8 7 ];
for i=1:10
[t,y]=ode45(fun,tsp,y0,[],w(i),i); plot(t,y)
end
请楼主帮忙看看这个程序, 我其实就是在xjzou给出的程序稍稍做一个改动
他给出的变参数例子,就是w在1,2,3,4,5,。。10有规律的基础上变动
而我的想法是w在5 6 9 5 2 6 1 5 8 7 这样一个无规律的基础上变动
上面是我想当然的结果,但是运行不了,对程序的内涵还是不够理解,就是依葫芦画瓢
请楼主指点指点
一直等着阿, 感受指点一下阿, 谢谢
[ 本帖最后由 ChaChing 于 2010-6-20 00:33 编辑 ] |
|