版块导航: 正在加载中...

登录注册

应《网络安全法》要求，自2017年10月1日起，未进行实名认证将不得使用互联网跟帖服务。为保障您的帐号能够正常使用，请尽快对帐号进行手机号验证，感谢您的理解与支持！

24小时热门版块排行榜

返回列表

当前主题已经存档。

bib96356

金虫 (正式写手)

应助: 0 (幼儿园)
金币: 1179.3
散金: 30
帖子: 517
在线: 81.2小时
虫号: 602153
注册: 2008-09-14

[交流] 【求助】这个程序有什么问题，要怎么修改，求助高手

>> phi1=0:1:2;
>> phi2=0;
>> bigphi=0;
>> phi1=phi1*pi/180
bigphi=bigphi*pi/180
phi2=phi2*pi/180
B(1,1)=cos(phi1)*cos(phi2)-sin(phi1)*sin(phi2)*cos(bigphi)
B(1,2)=sin(phi1)*cos(phi2)+cos(phi1)*sin(phi2)*cos(bigphi)
B(1,3)=sin(phi2)*sin(bigphi)
B(2,1)=-cos(phi1)*sin(phi2)-sin(phi1)*cos(phi2)*cos(bigphi)
B(2,2)=-sin(phi1)*sin(phi2)+cos(phi1)*cos(phi2)*cos(bigphi)
B(2,3)=cos(phi2)*sin(bigphi)
B(3,1)=sin(phi1)*sin(bigphi)
B(3,2)=-cos(phi1)*sin(bigphi)
B(3,3)=cos(bigphi)

回复此楼

» 猜你喜欢

有没有人能给点建议已经有5人回复
假如你的研究生提出不合理要求已经有12人回复
实验室接单子已经有7人回复
全日制（定向）博士已经有5人回复
萌生出自己或许不适合搞科研的想法，现在跑or等等看？已经有4人回复
Materials Today Chemistry审稿周期已经有4人回复
参与限项已经有3人回复
对氯苯硼酸纯化已经有3人回复
所感已经有4人回复
要不要辞职读博？已经有7人回复

1楼 2009-07-31 15:49:09

已阅回复此楼关注TA 给TA发消息送TA红花 TA的回帖

mopsite

木虫 (著名写手)

应助: 2 (幼儿园)
金币: 8687.7
散金: 424
红花: 2
帖子: 2546
在线: 615小时
虫号: 172296
注册: 2006-01-19
专业: 传热传质学

具体干嘛的有什么用处都不交待怎么改阿

赞一下

回复此楼

2楼2009-07-31 16:53:30

已阅回复此楼关注TA 给TA发消息送TA红花 TA的回帖

change0618

铁杆木虫 (著名写手)

方丈大师

应助: 44 (小学生)
金币: 17724.5
红花: 17
帖子: 2413
在线: 546.7小时
虫号: 496517
注册: 2008-01-19
专业: 化学反应工程

板凳。。。。。。。。。。。

回复此楼

3楼2009-07-31 17:59:09

已阅回复此楼关注TA 给TA发消息送TA红花 TA的回帖

change0618

铁杆木虫 (著名写手)

方丈大师

应助: 44 (小学生)
金币: 17724.5
红花: 17
帖子: 2413
在线: 546.7小时
虫号: 496517
注册: 2008-01-19
专业: 化学反应工程

phi1=0:1:2是一个向量，而你的B(1,1)等均是一个元素，所以维数不对。
另外用度数表示的三角函数，可以用sind, cosd, cotd, tand等表示，免除了转化为弧度的麻烦。

赞一下

回复此楼

4楼2009-07-31 18:09:18

已阅回复此楼关注TA 给TA发消息送TA红花 TA的回帖

change0618

铁杆木虫 (著名写手)

方丈大师

应助: 44 (小学生)
金币: 17724.5
红花: 17
帖子: 2413
在线: 546.7小时
虫号: 496517
注册: 2008-01-19
专业: 化学反应工程

phi1=2;
phi2=0;
bigphi=0;
B(1,1)=cosd(phi1)*cosd(phi2)-sind(phi1)*sind(phi2)*cosd(bigphi);
B(1,2)=sind(phi1)*cosd(phi2)+cosd(phi1)*sind(phi2)*cosd(bigphi);
B(1,3)=sind(phi2)*sind(bigphi);
B(2,1)=-cosd(phi1)*sind(phi2)-sind(phi1)*cosd(phi2)*cosd(bigphi);
B(2,2)=-sind(phi1)*sind(phi2)+cosd(phi1)*cosd(phi2)*cosd(bigphi);
B(2,3)=cosd(phi2)*sind(bigphi);
B(3,1)=sind(phi1)*sind(bigphi);
B(3,2)=-cosd(phi1)*sind(bigphi);
B(3,3)=cosd(bigphi);
disp(B)

赞一下

回复此楼

5楼2009-07-31 18:17:17

已阅回复此楼关注TA 给TA发消息送TA红花 TA的回帖

change0618

铁杆木虫 (著名写手)

方丈大师

应助: 44 (小学生)
金币: 17724.5
红花: 17
帖子: 2413
在线: 546.7小时
虫号: 496517
注册: 2008-01-19
专业: 化学反应工程

★ ★ ★ ★ ★ ★
woshilsh(金币+3,VIP+0):感谢，等待楼主确认 7-31 18:36
bib96356(金币+3,VIP+0): 7-31 21:40

phi1=0:1:2;
phi2=0;
bigphi=0;
B(1,1,: )=cosd(phi1)*cosd(phi2)-sind(phi1)*sind(phi2)*cosd(bigphi);
B(1,2,: )=sind(phi1)*cosd(phi2)+cosd(phi1)*sind(phi2)*cosd(bigphi);
B(1,3,: )=sind(phi2)*sind(bigphi);
B(2,1,: )=-cosd(phi1)*sind(phi2)-sind(phi1)*cosd(phi2)*cosd(bigphi);
B(2,2,: )=-sind(phi1)*sind(phi2)+cosd(phi1)*cosd(phi2)*cosd(bigphi);
B(2,3,: )=cosd(phi2)*sind(bigphi);
B(3,1,: )=sind(phi1)*sind(bigphi);
B(3,2,: )=-cosd(phi1)*sind(bigphi);
B(3,3,: )=cosd(bigphi);
disp(B)

赞一下(22人)

回复此楼

6楼2009-07-31 18:23:17

已阅回复此楼关注TA 给TA发消息送TA红花 TA的回帖

bib96356

金虫 (正式写手)

应助: 0 (幼儿园)
金币: 1179.3
散金: 30
帖子: 517
在线: 81.2小时
虫号: 602153
注册: 2008-09-14

>> phi1=0:1:2;

问题更复杂点，如果是这样，要怎么解决呢？
>> phi2=0;
>> bigphi=0:1:2;
>> phi1=phi1*pi/180
bigphi=bigphi*pi/180
phi2=phi2*pi/180
B(1,1)=cos(phi1)*cos(phi2)-sin(phi1)*sin(phi2)*cos(bigphi)
B(1,2)=sin(phi1)*cos(phi2)+cos(phi1)*sin(phi2)*cos(bigphi)
B(1,3)=sin(phi2)*sin(bigphi)
B(2,1)=-cos(phi1)*sin(phi2)-sin(phi1)*cos(phi2)*cos(bigphi)
B(2,2)=-sin(phi1)*sin(phi2)+cos(phi1)*cos(phi2)*cos(bigphi)
B(2,3)=cos(phi2)*sin(bigphi)
B(3,1)=sin(phi1)*sin(bigphi)
B(3,2)=-cos(phi1)*sin(bigphi)
B(3,3)=cos(bigphi)

赞一下

回复此楼

7楼2009-07-31 21:43:04

已阅回复此楼关注TA 给TA发消息送TA红花 TA的回帖