| 24小時(shí)熱門版塊排行榜 |
| 5 | 1/1 | 返回列表 |
| 查看: 1510 | 回復(fù): 3 | |||
| 當(dāng)前只顯示滿足指定條件的回帖,點(diǎn)擊這里查看本話題的所有回帖 | |||
[交流]
【求助】關(guān)于向量投影的問題
|
|||
|
有兩個(gè)點(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)動(dòng)到點(diǎn)D(x4,y4,z4)時(shí),沿AB基準(zhǔn)軸方向的位移以及沿垂直于AB基準(zhǔn)軸方向的位移。我寫了一個(gè)程序,勞煩大家?guī)兔纯矗@個(gè)程序有沒有問題以及能不能實(shí)現(xiàn)我的目的?請(qǐng)大家不吝賜教。 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 |
» 搶金幣啦!回帖就可以得到:
+1/492
+1/182
+1/89
+1/72
+1/45
+1/36
+1/36
+2/32
+2/30
+1/16
+1/12
+1/8
+1/7
+1/6
+1/5
+1/4
+1/3
+1/2
+1/2
+1/1
至尊木蟲 (職業(yè)作家)
金蟲 (正式寫手)
|
發(fā)現(xiàn)一個(gè)小問題, 把下面一段改一下 " 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方向的,所以不對(duì) p2也沿cd方向。 |
| 最具人氣熱帖推薦 [查看全部] | 作者 | 回/看 | 最后發(fā)表 | |
|---|---|---|---|---|
|
[考研] 085602化工求調(diào)劑(331分) +8 | 111@127 2026-03-30 | 8/400 |
|
|---|---|---|---|---|
|
[考研] 303求調(diào)劑 +7 | DLkz1314. 2026-03-30 | 7/350 |
|
|
[考研] 調(diào)劑 +4 | GK72 2026-03-30 | 4/200 |
|
|
[考研] 359求調(diào)劑 +5 | 王了個(gè)楠 2026-03-25 | 5/250 |
|
|
[考研] 一志愿:西北大學(xué),英一數(shù)一408-284分求調(diào)劑 +5 | 12.27 2026-03-27 | 5/250 |
|
|
[考研] 291求調(diào)劑 +8 | HanBeiNingZC 2026-03-24 | 8/400 |
|
|
[考研] 生物技術(shù)與工程 +7 | 1294608413 2026-03-25 | 8/400 |
|
|
[考研] 085600,材料與化工321分求調(diào)劑 +10 | 大饞小子 2026-03-28 | 10/500 |
|
|
[考研] 本科雙非材料,跨考一志愿華電085801電氣,283求調(diào)劑,任何專業(yè)都可以 +6 | 芝士雪baoo 2026-03-28 | 8/400 |
|
|
[考研] 321求調(diào)劑 +7 | 璞玉~~ 2026-03-25 | 8/400 |
|
|
[考研] 085701環(huán)境工程,267求調(diào)劑 +16 | minht 2026-03-26 | 16/800 |
|
|
[考研] 265求調(diào)劑 +8 | 小木蟲085600 2026-03-27 | 8/400 |
|
|
[考研] 復(fù)試調(diào)劑,一志愿南農(nóng)083200食品科學(xué)與工程 +5 | XQTJZ 2026-03-26 | 5/250 |
|
|
[考研] 085600,材料與化工321分調(diào)劑 +4 | 大饞小子 2026-03-27 | 6/300 |
|
|
[考研] 085601 材料工程 313分 求調(diào)劑 +5 | Ong3 2026-03-27 | 5/250 |
|
|
[考研] 315調(diào)劑 +4 | 0860求調(diào)劑 2026-03-26 | 5/250 |
|
|
[考研] 化學(xué)調(diào)劑一志愿上海交通大學(xué)336分-本科上海211 +4 | 小魚愛有機(jī) 2026-03-25 | 4/200 |
|
|
[考研] 290分調(diào)劑求助 +3 | 吉祥止止陳 2026-03-25 | 3/150 |
|
|
[考研] 網(wǎng)絡(luò)空間安全0839招調(diào)劑 +4 | w320357296 2026-03-25 | 6/300 |
|
|
[考研]
|
13659058978 2026-03-24 | 4/200 |
|