| 查看: 1089 | 回复: 3 | ||
| 当前只显示满足指定条件的回帖,点击这里查看本话题的所有回帖 | ||
阿毛虫银虫 (正式写手)
|
[求助]
关于梁的一个简单的matlab程序,我想求出这个方程的零点,求大神指点 已有1人参与
|
|
|
global Omega1; global b1; global r; global s; global alfa1; global beta1; G=8E10; K=1.2; E=2.06e11; P=7.9e3; L=4; D=0.8; H=0.2; k=1/K; I=D*(H^3)/12; A=D*H; Omega1=linspace( 0,sqrt((k*G*A)/(P*I)),10000); b1=sqrt(P*A/(E*I)).*Omega1; r=sqrt(I/A); s=sqrt(E*I/(k*A*G)); alfa1=b1.*sqrt(-(r^2+s^2)+sqrt((r^2-s^2)^2+4./(b1.^2)))/sqrt(2); beta1=b1.*sqrt(r^2+s^2+sqrt((r^2-s^2)^2+4./(b1.^2)))/sqrt(2); clamped_clamped1=2-2*cosh(alfa1.*L).*cos(beta1.*L)-(b1./sqrt(1-b1.^2*r^2*s^2)).*(r^2-3*s^2-(b1.^2*s^2)*(r^2-s^2)^2).*sin(beta1.*L).*sinh(alfa1.*L);%定义函数表达式 figure(1) plot(Omega1,clamped_clamped1,'b') title('clamped_clamped beam1') hold on plot(xlim,[0 0],'r') 我就想求出clamped_clamped1=0时候,Omega1的值。应该怎么写程序啊???? |
» 猜你喜欢
求助低温等离子渗氮
已经有0人回复
TiNb合金抛光-电解抛光
已经有1人回复
工程热物理与能源利用论文润色/翻译怎么收费?
已经有189人回复
合金高温性能
已经有0人回复
小木虫没落了,除了祈祷帖子,几乎看不到有价值的帖子
已经有19人回复
7075材料过滤难
已经有0人回复
求一篇论文,出自Molecular Simulation,
已经有0人回复
达姆施塔特市中心好房出租
已经有52人回复
考博求助
已经有2人回复
各位大佬帮忙分析一下面上意见,是否上会?几个A、B、C?
已经有108人回复
模型网格划分
已经有0人回复

阿毛虫
银虫 (正式写手)
- 应助: 0 (幼儿园)
- 金币: 657.2
- 散金: 81
- 帖子: 757
- 在线: 117.2小时
- 虫号: 3313820
- 注册: 2014-07-08
- 性别: GG
- 专业: 机械动力学

3楼2015-11-07 15:24:25
卡尔俾斯
铁杆木虫 (著名写手)
- 应助: 10 (幼儿园)
- 金币: 11486.5
- 散金: 220
- 红花: 6
- 帖子: 2187
- 在线: 247.7小时
- 虫号: 2181524
- 注册: 2012-12-12
- 性别: GG
- 专业: 制造系统与自动化
2楼2015-11-07 07:52:11
卡尔俾斯
铁杆木虫 (著名写手)
- 应助: 10 (幼儿园)
- 金币: 11486.5
- 散金: 220
- 红花: 6
- 帖子: 2187
- 在线: 247.7小时
- 虫号: 2181524
- 注册: 2012-12-12
- 性别: GG
- 专业: 制造系统与自动化
4楼2015-11-07 16:36:49










回复此楼