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

24小时热门版块排行榜    

小木虫论坛-学术科研互动平台 » 计算模拟区 » 程序语言 » 【求助】这个程序有什么问题，要怎么修改，求助高手
北京石油化工学院2026年研究生招生接收调剂公告
141/2返回列表12下一页
查看: 651  |  回复: 13
只看楼主 @他人 存档 新回复提醒 (忽略) 收藏    在APP中查看
当前主题已经存档。

bib96356

金虫 (正式写手)

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

>> 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)
回复此楼

» 猜你喜欢
1楼 2009-07-31 15:49:09
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

mopsite

木虫 (著名写手)
具体干嘛的 有什么用处 都不交待  怎么改阿
赞一下 回复此楼
2楼2009-07-31 16:53:30
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

change0618

铁杆木虫 (著名写手)

方丈大师
板凳。。。。。。。。。。。
回复此楼
3楼2009-07-31 17:59:09
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

change0618

铁杆木虫 (著名写手)

方丈大师
phi1=0:1:2是一个向量，而你的B(1,1)等均是一个元素，所以维数不对。
另外用度数表示的三角函数，可以用sind, cosd, cotd, tand等表示，免除了转化为弧度的麻烦。
赞一下 回复此楼
4楼2009-07-31 18:09:18
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

change0618

铁杆木虫 (著名写手)

方丈大师
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

铁杆木虫 (著名写手)

方丈大师
★ ★ ★ ★ ★ ★
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

金虫 (正式写手)
>> 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的回帖

bib96356

金虫 (正式写手)
有没有其他的方法实现这个问题呢？
赞一下 回复此楼
8楼2009-07-31 21:50:38
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

bib96356

金虫 (正式写手)
自己顶啊
回复此楼
9楼2009-08-01 14:46:41
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

qllq1661

木虫 (职业作家)
说清楚程序的目的，这样大家也好下手
赞一下 回复此楼
10楼2009-08-01 15:47:55
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 bib96356 的主题更新
141/2返回列表12下一页
普通表情 龙 兔 虎 猫 高级回复 (可上传附件)
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 一志愿武汉理工，总分321，英一数二，求老师收留。 +8 nnnnnnn5 2026-03-25 8/400 2026-03-29 10:38 by 唐沐儿
[考研] 343求调剂 +4 爱羁绊 2026-03-29 4/200 2026-03-29 10:30 by 唐沐儿
[考研] 329求调剂 +7 星野? 2026-03-26 7/350 2026-03-29 06:43 by 544594351
[考研] 085602 化工专硕 338分 求调剂 +12 路痴小琪 2026-03-27 12/600 2026-03-28 15:41 by L135790
[考研] 312，生物学求调剂 +3 小译同学abc 2026-03-28 3/150 2026-03-28 15:32 by 落睿可思
[考研] 化学0703 调剂 306分 一志愿211 +4 26要上岸 2026-03-28 4/200 2026-03-28 15:30 by 1018329917
[考研] 070300求调剂306分 +4 26要上岸 2026-03-27 4/200 2026-03-28 13:06 by 唐沐儿
[考研] 【求调剂】085601材料工程专硕 | 总分272 | +6 脚滑的守法公民 2026-03-27 6/300 2026-03-28 11:02 by gjlllb
[考研] 085405 考的11408求各位老师带走 +3 Qiu学ing 2026-03-28 3/150 2026-03-28 09:19 by 乐呵呵的追梦人
[考研] 08开头275求调剂 +4 拉谁不重要 2026-03-26 4/200 2026-03-27 14:12 by Delta2012
[考研] 348求调剂 +4 小懒虫不懒了 2026-03-27 5/250 2026-03-27 12:47 by 果果妈咪
[考研] 325求调剂 +5 李嘉图·S·路 2026-03-23 5/250 2026-03-27 00:42 by wxiongid
[考研] 336材料求调剂 +7 陈滢莹 2026-03-26 9/450 2026-03-27 00:20 by wxiongid
[考研] 327求调剂 +7 prayer13 2026-03-23 7/350 2026-03-26 20:48 by 不吃魚的貓
[考研] 26考研-291分-厦门大学（085601）-柔性电子学院材料工程专业求调剂 +3 min3 2026-03-24 4/200 2026-03-25 18:22 by xcjcqu
[考研] 0854电子信息求调剂 +7 α____ 2026-03-22 9/450 2026-03-25 13:37 by α____
[考研] 293求调剂 +7 加一一九 2026-03-24 7/350 2026-03-25 12:02 by userper
[考研] 一志愿南航材料专317分求调剂 +5 炸呀炸呀炸薯条 2026-03-23 5/250 2026-03-24 16:52 by 星空星月
[考研] 一志愿河北工业大学0817化工278分求调剂 +7 jhybd 2026-03-23 12/600 2026-03-24 09:03 by jhybd
[考研] 328求调剂 +4 LHHL66 2026-03-23 4/200 2026-03-23 14:55 by lbsjt
信息提示
关闭
请填处理意见
关闭