 |
 |
 |
 |
 |
 |
||
 |
 |
 |
 |
 |
| 4 | 1/1 | 返回列表 |
| 查看: 1503 | 回復(fù): 3 | |||
[交流]
【求助】關(guān)于向量投影的問題
|
|
有兩個點(diǎn)A（x1,y1,z1）,B（x2,y2,z2）,現(xiàn)在以由點(diǎn)A和B確定的直線為基準(zhǔn)軸，我想求的是當(dāng)以物體由點(diǎn)C（x3,y3,z3）運(yùn)動到點(diǎn)D（x4,y4,z4）時，沿AB基準(zhǔn)軸方向的位移以及沿垂直于AB基準(zhǔn)軸方向的位移。我寫了一個程序，勞煩大家?guī)兔纯�，這個程序有沒有問題以及能不能實(shí)現(xiàn)我的目的?請大家不吝賜教。 program get_projection implicit none real x1,y1,z1 real x2,y2,z2 real x3,y3,z3 real x4,y4,z4 real theta real dx1,dy1,dz1,dx2,dy2,dz2 real px1,py1,pz1,px2,py2,pz2 real r1,r2 ! 求基準(zhǔn)軸AB dx1=x2-x1 dy1=y2-y1 dz1=z2-z1 !求CD的位移（前保存的結(jié)果） dx2=x4-x3 dy2=y4-y3 dz2=z4-z3 !求AB和CD的模 r1=dx1**2+dy1**2+dz1**2 r2=dx2**2+dy2**2+dz2**2 ！由點(diǎn)乘公式計(jì)算AB與CD所形成的角theta theta=acos ((dx1*dx2+dy1*dy2+dz1*dz2)/(sqrt(r1)*sqrt(r2))) !計(jì)算沿AB基準(zhǔn)軸方向的位移 px1=dx2*cos(theta) py1=dy2*cos(theta) pz1=dz2*cos(theta) !沿垂直于AB基準(zhǔn)軸方向的位移 px2=dx2*sin(theta) py2=dy2*sin(theta) pz2=dz2*sin(theta) end |
回復(fù)此樓» 猜你喜歡
276求調(diào)劑。有半年電池和半年高分子實(shí)習(xí)經(jīng)歷
已經(jīng)有4人回復(fù)
-
284求調(diào)劑
已經(jīng)有6人回復(fù)
-
306求調(diào)劑
已經(jīng)有7人回復(fù)
-
291求調(diào)劑
已經(jīng)有5人回復(fù)
-
070300化學(xué)求調(diào)劑
已經(jīng)有4人回復(fù)
-
070300，一志愿北航320求調(diào)劑
已經(jīng)有5人回復(fù)
-
085600材料與化工
已經(jīng)有9人回復(fù)
-
0703 調(diào)劑
已經(jīng)有6人回復(fù)
-
招08考數(shù)學(xué)
已經(jīng)有11人回復(fù)
-
276求調(diào)劑
已經(jīng)有4人回復(fù)
» 本主題相關(guān)價值貼推薦，對您同樣有幫助:
- 高維數(shù)組投影到子空間
已經(jīng)有4人回復(fù)
- 向量的投影
已經(jīng)有4人回復(fù)
- 【求助】關(guān)于經(jīng)典物理中時間各向同性的理解
已經(jīng)有13人回復(fù)
- 【求助】關(guān)于向量投影的問題
已經(jīng)有3人回復(fù)
- 【求助】國外的一道作業(yè)題，不會做！
已經(jīng)有10人回復(fù)
- 【討論】ARCGIS中如何實(shí)現(xiàn)同一區(qū)域不同投影和比例尺的兩張矢量圖的要素疊合？
已經(jīng)有4人回復(fù)
- 【求助】transiesta中關(guān)于軌道的問題
已經(jīng)有18人回復(fù)
- 【轉(zhuǎn)帖】理解矩陣
已經(jīng)有51人回復(fù)
- 【討論】NEB尋找過渡態(tài)專題討論
已經(jīng)有49人回復(fù)
» 搶金幣啦！回帖就可以得到:
-
求購電鏡上的液氮罐
+5/175
-
真誠找個相伴一生的另一半，非誠勿擾
+1/80
-
西北大學(xué)化學(xué)與材料科學(xué)學(xué)院博士招生（還有兩個名額，3月30日截至）
+1/63
-
湘潭大學(xué)化工學(xué)院國家級人才團(tuán)隊(duì)2026年博士研究生招生
+1/58
-
光學(xué)工程學(xué)碩調(diào)劑信息
+2/42
-
河南工學(xué)院誠聘優(yōu)秀凝聚態(tài)物理和電子科學(xué)與技術(shù)相關(guān)專業(yè)碩博研究生
+2/32
-
湖南大學(xué)微生物結(jié)構(gòu)與功能實(shí)驗(yàn)室2026年計(jì)劃招收博士研究生
+1/17
-
中南大學(xué)喻桂朋教授團(tuán)隊(duì)新增2026年博士研究生
+1/15
-
浙江中醫(yī)藥大學(xué)副校長團(tuán)隊(duì)招聘藥學(xué)/生物信息學(xué)等方向高校教師7名，報(bào)名通道已開啟
+1/12
-
武漢高校國家級人才團(tuán)隊(duì)招收材料，化學(xué)，紡織等專業(yè)碩士調(diào)劑生
+2/12
-
教育部長江學(xué)者和創(chuàng)新團(tuán)隊(duì)發(fā)展計(jì)劃”入選團(tuán)隊(duì)招收 材料，化學(xué)與化工博士研究生
+1/12
-
北京航空航天大學(xué)招生微流控與智能打印技術(shù)方向博士研究生
+2/8
-
南開大學(xué)陳樹琪教授研究團(tuán)隊(duì)招收2026級超構(gòu)材料方向博士研究生
+1/8
-
26年申博自薦-計(jì)算機(jī)視覺
+1/5
-
5han一本強(qiáng)校招收材料專業(yè)碩士
+1/5
-
調(diào)劑 22408 340分
+1/4
-
[求調(diào)劑]鄭州大學(xué)生物技術(shù)專業(yè) 一志愿浙大生科院340分
+1/4
-
211/雙一流石河子大學(xué)化學(xué)化工學(xué)院--電催化，CO2轉(zhuǎn)化
+1/3
-
中國農(nóng)科院蘭州牧藥所獸藥創(chuàng)新與耐藥性科研團(tuán)隊(duì)聘科研助理，急急急！
+1/3
-
我寫了一篇關(guān)于“健康永生”的論文，被VITA秒拒過程公開了，歡迎討論
+1/3
snoopyzhao
至尊木蟲 (職業(yè)作家)
- 程序強(qiáng)帖: 16
- 應(yīng)助: 157 (高中生)
- 貴賓: 0.02
- 金幣: 18844.7
- 帖子: 3803
- 在線: 1422.4小時
- 蟲號: 183750
2樓2011-01-21 09:12:14
★ ★
astringent(金幣+5): 2011-02-17 02:57:21
astringent(金幣+10): 2011-02-17 03:11:16
余澤成(金幣+2): 謝謝參與應(yīng)助，歡迎常來程序語言版！ 2011-02-20 18:34:56
astringent(金幣+5): 2011-02-17 02:57:21
astringent(金幣+10): 2011-02-17 03:11:16
余澤成(金幣+2): 謝謝參與應(yīng)助，歡迎常來程序語言版！ 2011-02-20 18:34:56
|
發(fā)現(xiàn)一個小問題， 把下面一段改一下 " px1=dx2*cos(theta) py1=dy2*cos(theta) pz1=dz2*cos(theta) !沿垂直于AB基準(zhǔn)軸方向的位移 px2=dx2*sin(theta) py2=dy2*sin(theta) pz2=dz2*sin(theta) “ ==》 ” px1= dx1/sqrt(r1) * sqrt(r2) *cos(theta) py1= dy1/sqrt(r1) * sqrt(r2) *cos(theta) pz1= dz1/sqrt(r1) * sqrt(r2) *cos(theta) !沿垂直于AB基準(zhǔn)軸方向的位移 px2=dx2-px1 py2=dy2-py1 pz2=dz2-pz1 “ 原程序里p1求的向量是沿cd方向的，所以不對 p2也沿cd方向。 |
3樓2011-02-16 16:25:27
★ ★
astringent(金幣+10): 2011-02-17 02:57:30
余澤成(金幣+2): 謝謝參與應(yīng)助，歡迎常來程序語言版！ 2011-02-20 18:35:06
astringent(金幣+10): 2011-02-17 02:57:30
余澤成(金幣+2): 謝謝參與應(yīng)助，歡迎常來程序語言版！ 2011-02-20 18:35:06
 本帖僅樓主可見 |
4樓2011-02-16 17:10:15
相關(guān)版塊跳轉(zhuǎn)
我要訂閱樓主 astringent 的主題更新
| 4 | 1/1 | 返回列表 |
| 最具人氣熱帖推薦 [查看全部] | 作者 | 回/看 | 最后發(fā)表 | |
|---|---|---|---|---|
|
[考研]
 一志愿070300浙大化學(xué)358分，求調(diào)劑！
+4
|
酥酥魚.. 2026-03-21 | 4/200 |
|
|---|---|---|---|---|
|
|
[考研] 277材料科學(xué)與工程080500求調(diào)劑 +7 | 自由煎餅果子 2026-03-16 | 7/350 |
|
|
|
[考研] 一志愿武理材料工程348求調(diào)劑 +5 | ￣^￣゜汗 2026-03-19 | 7/350 |
|
|
|
[考研] 287求調(diào)劑 +8 | 晨昏線與星海 2026-03-19 | 9/450 |
|
|
[考研] 269專碩求調(diào)劑 +6 | 金恩貝 2026-03-21 | 6/300 |
|
|
|
[考研] 286求調(diào)劑 +10 | Faune 2026-03-21 | 10/500 |
|
|
|
[考研] 資源與環(huán)境 調(diào)劑申請(333分) +5 | holy J 2026-03-21 | 5/250 |
|
|
|
[考研] 0703化學(xué)297求調(diào)劑 +3 | Daisy☆ 2026-03-20 | 3/150 |
|
|
|
[考研] 306求0703調(diào)劑一志愿華中師范 +5 | 紙魚ly 2026-03-21 | 5/250 |
|
|
|
[考研] 材料與化工（0856）304求 B區(qū) 調(diào)劑 +3 | 邱gl 2026-03-21 | 3/150 |
|
|
|
[考研] 265求調(diào)劑 +12 | 梁梁校校 2026-03-19 | 14/700 |
|
|
|
[考研] 265求調(diào)劑 +3 | Jack?k?y 2026-03-17 | 3/150 |
|
|
|
[考研] 一志愿 西北大學(xué) ，070300化學(xué)學(xué)碩，總分287，雙非一本，求調(diào)劑。 +4 | 晨昏線與星海 2026-03-19 | 4/200 |
|
|
|
[考研] 一志愿蘇州大學(xué)材料求調(diào)劑，總分315（英一） +5 | sbdksD 2026-03-19 | 5/250 |
|
|
|
[考研] 材料學(xué)求調(diào)劑 +4 | Stella_Yao 2026-03-20 | 4/200 |
|
|
|
[考研] 求調(diào)劑 +3 | @taotao 2026-03-20 | 3/150 |
|
|
|
[考研] 求調(diào)劑 +3 | 暗涌afhb 2026-03-16 | 3/150 |
|
|
|
[考研] 0703化學(xué)調(diào)劑 +4 | 18889395102 2026-03-18 | 4/200 |
|
|
|
[考研] 085600材料與化工求調(diào)劑 +6 | 緒幸與子 2026-03-17 | 6/300 |
|
|
|
[考研] 0854可跨調(diào)劑，一作一項(xiàng)核心論文五項(xiàng)專利，省、國級證書40+數(shù)一英一287 +8 | 小李0854 2026-03-16 | 8/400 |
|