24小时热门版块排行榜    

CyRhmU.jpeg
查看: 1490  |  回复: 12

815292578

木虫 (著名写手)

送红花一朵
引用回帖:
10楼: Originally posted by fengtion at 2013-09-06 11:11:10
第一个方程就可以直接解出Wn吧,剩下的编个程序就OK了?是不是这个思路,如果是可以帮你解决

是的,第一个方程就可以求出wn,你能否写一下程序或是简单的编写思路?我对Matlab软件不是很熟。十分感谢....
11楼2013-09-07 09:12:45
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

fengtion

新虫 (初入文坛)

【答案】应助回帖

引用回帖:
11楼: Originally posted by 815292578 at 2013-09-07 09:12:45
是的,第一个方程就可以求出wn,你能否写一下程序或是简单的编写思路?我对Matlab软件不是很熟。十分感谢.......

%%%说明:里面的有些符号是题目中的定值,你得把常数带进去,不能用我程序里的字符,
function jisuan(w)   %%%说明:w是你求出的wn,是一个数组,取足够的数据(解是无限的,这儿取几百个就够了)
syms x
u=Dcj*(w.^2-w0^2)/(2*a);  %%%说明:直接求出u
n=lenth(w);
c=zeros(n,1);
b=zeros(n,1);
A=zeros(n,1);
for i=1:n
    b(i)=-w0*int(sin(w0*x)*cos(w(i)*x),x,0,r0/a);
    for j=1:n
        c(i)=w(j)*int(sin(w(j)*x)*cos(w(i)*x),x,0,r0/a)+c(i);
    end
    A(i)=b(i)/c(i);
end
disp(A);
diap(u);
12楼2013-09-23 20:11:55
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

fengtion

新虫 (初入文坛)

引用回帖:
12楼: Originally posted by fengtion at 2013-09-23 20:11:55
%%%说明:里面的有些符号是题目中的定值,你得把常数带进去,不能用我程序里的字符,
function jisuan(w)   %%%说明:w是你求出的wn,是一个数组,取足够的数据(解是无限的,这儿取几百个就够了)
syms x
u=Dcj ...

这个是数值上的近似解,程序我没有验证过,不知道正确否,但思路是这样。  另外这种问题用Maple很好算。。。。建议碰到这类问题,自己看看Matlab或Maple的书
13楼2013-09-23 20:14:47
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 815292578 的主题更新
信息提示
请填处理意见