 |
 |
 |
 |
 |
 |
||
 |
 |
 |
 |
 |
| 5 | 1/1 | 返回列表 |
| 查看: 1511 | 回復(fù): 3 | |||
| 當(dāng)前只顯示滿足指定條件的回帖，點擊這里查看本話題的所有回帖 | |||
[交流]
【求助】關(guān)于向量投影的問題
|
|||
|
有兩個點A（x1,y1,z1）,B（x2,y2,z2）,現(xiàn)在以由點A和B確定的直線為基準(zhǔn)軸，我想求的是當(dāng)以物體由點C（x3,y3,z3）運動到點D（x4,y4,z4）時，沿AB基準(zhǔn)軸方向的位移以及沿垂直于AB基準(zhǔn)軸方向的位移。我寫了一個程序，勞煩大家?guī)兔纯�，這個程序有沒有問題以及能不能實現(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 ！由點乘公式計算AB與CD所形成的角theta theta=acos ((dx1*dx2+dy1*dy2+dz1*dz2)/(sqrt(r1)*sqrt(r2))) !計算沿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ù)此樓» 猜你喜歡
一志愿大連理工大學(xué)材料求調(diào)劑
已經(jīng)有5人回復(fù)
-
材料與化工調(diào)劑一志愿大連海事085600，349
已經(jīng)有6人回復(fù)
-
一志愿中海洋320化學(xué)工程與技術(shù)學(xué)碩求調(diào)劑
已經(jīng)有4人回復(fù)
-
材料科學(xué)與工程調(diào)劑
已經(jīng)有11人回復(fù)
-
311求調(diào)劑一志愿合肥工業(yè)大學(xué)
已經(jīng)有4人回復(fù)
-
一志愿食品科學(xué)與工程083200求調(diào)劑
已經(jīng)有4人回復(fù)
-
材料科學(xué)與工程求調(diào)劑
已經(jīng)有10人回復(fù)
-
一志愿北化085600材料專碩275|有文章專利｜求調(diào)劑
已經(jīng)有11人回復(fù)
-
一志愿 南京航空航天大學(xué) ，080500材料科學(xué)與工程學(xué)碩
已經(jīng)有4人回復(fù)
-
085600材料與化工調(diào)劑
已經(jīng)有15人回復(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中如何實現(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ù)
» 搶金幣啦！回帖就可以得到:
-
天津科技大學(xué)-（新晉院士團隊）先進纖維與紙基功能材料團隊B+專業(yè)
+1/87
-
上海電力大學(xué)先進儲能電池技術(shù)課題組招生
+1/78
-
新疆碳納米材料制備與應(yīng)用重點實驗室2026年招聘啟事
+1/39
-
臺州學(xué)院醫(yī)藥化工學(xué)院2026年化學(xué)/化學(xué)工程碩士研究生
+2/18
-
電子信息數(shù)一英一336分求調(diào)劑
+1/17
-
【實戰(zhàn)型】【生物醫(yī)藥】2026青島大學(xué)招博士生 含少數(shù)民族骨干計劃2名！
+1/16
-
南方科技大學(xué)微電子學(xué)院陳鵬教授招收2026級博士生（第二批）
+1/12
-
【2026調(diào)劑】南方科技大學(xué)-深圳理工大學(xué)-中科院 聯(lián)培086000免疫方向(26.9入學(xué))
+1/11
-
重慶工商大學(xué) 教育部研究中心招收化工/環(huán)境/材料/石油/機械方向2026年調(diào)劑研究生
+1/11
-
西華大學(xué)材料學(xué)院表面科學(xué)與工程技術(shù)科研團隊2026年招收研究生
+1/10
-
南京醫(yī)科大學(xué)-譚磊課題組-誠招博士后
+1/8
-
2026年中國科學(xué)院城市環(huán)境所與福建農(nóng)林大學(xué)聯(lián)合培養(yǎng)碩士研究生項目介紹
+1/6
-
NTU招聘生物微機電系統(tǒng)/微流控/3D打印/可穿戴器件方向全獎博士
+1/5
-
招聘智慧建造或城鄉(xiāng)規(guī)劃背景碩士生
+1/5
-
武漢工程大學(xué)化學(xué)與環(huán)境工程學(xué)院招收調(diào)劑生
+1/4
-
2026年江西科技師范大學(xué)Tide課題組招收化學(xué)、生物、藥學(xué)、材料相關(guān)學(xué)碩或?qū)４T調(diào)劑生
+1/4
-
招聘碩博生：基于機器學(xué)習(xí)和人工智能的結(jié)構(gòu)/合金設(shè)計-西安交大
+1/2
-
2026年北京石油化工學(xué)院環(huán)境學(xué)科-水污染控制工程方向課題組歡迎您
+1/1
-
武漢理工大學(xué)船海與能源動力工程學(xué)院劉鵬飛院士團隊博士后招聘啟事
+1/1
-
武漢理工大學(xué)船海與能源動力工程學(xué)院 劉鵬飛院士團隊專任教師招聘啟事
+1/1
★ ★
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
snoopyzhao
至尊木蟲 (職業(yè)作家)
- 程序強帖: 16
- 應(yīng)助: 157 (高中生)
- 貴賓: 0.02
- 金幣: 18844.7
- 帖子: 3803
- 在線: 1422.4小時
- 蟲號: 183750
2樓2011-01-21 09:12:14
★ ★
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
| 最具人氣熱帖推薦 [查看全部] | 作者 | 回/看 | 最后發(fā)表 | |
|---|---|---|---|---|
|
[考研] 307求調(diào)劑 +18 | 超級伊昂大王 2026-03-24 | 20/1000 |
|
|---|---|---|---|---|
|
|
[考研] 274求調(diào)劑 +4 | xiao愛同學(xué) 2026-03-30 | 4/200 |
|
|
|
[考研] 22408 359分調(diào)劑 +4 | Qshers 2026-03-27 | 7/350 |
|
|
|
[考研] 359求調(diào)劑 +5 | 王了個楠 2026-03-25 | 5/250 |
|
|
|
[考研] 334分 一志愿武理 材料求調(diào)劑 +16 | 李李不服輸 2026-03-26 | 16/800 |
|
|
|
[考研] 293求調(diào)劑 +3 | 末未mm 2026-03-30 | 5/250 |
|
|
|
[考研] 298求調(diào)劑 +3 | 什么是胖頭魚 2026-03-30 | 5/250 |
|
|
|
[考研] 317求調(diào)劑 +10 | 蛋黃咸肉粽 2026-03-26 | 10/500 |
|
|
[考研] 考研調(diào)劑 +7 | 小蠟新筆 2026-03-29 | 7/350 |
|
|
|
[考研] 0856求調(diào)劑 +13 | zhn03 2026-03-25 | 14/700 |
|
|
|
[考研] 調(diào)劑考研 +3 | 王杰一 2026-03-29 | 3/150 |
|
|
|
[碩博家園] 招收生物學(xué)/細(xì)胞生物學(xué)調(diào)劑 +4 | IceGuo 2026-03-26 | 5/250 |
|
|
|
[考研] 本科新能源科學(xué)與工程，一志愿華理能動285求調(diào)劑 +3 | AZMK 2026-03-27 | 5/250 |
|
|
|
[考研] 070300求調(diào)劑306分 +4 | 26要上岸 2026-03-27 | 4/200 |
|
|
|
[考研] 286求調(diào)劑 +12 | PolarBear11 2026-03-26 | 12/600 |
|
|
|
[考研] 292求調(diào)劑 +14 | 鵝鵝鵝額額額額?/a> 2026-03-25 | 15/750 |
|
|
|
[考研] 285求調(diào)劑 +4 | AZMK 2026-03-27 | 7/350 |
|
|
|
[考研] 266分求材料化工冶金礦業(yè)等專業(yè)的調(diào)劑 +4 | 哇呼哼呼哼 2026-03-26 | 4/200 |
|
|
|
[考研] 中國科學(xué)院深圳先進技術(shù)研究院-光纖傳感課題組招生-中國科學(xué)院大學(xué)、深圳理工大學(xué)聯(lián)培 +5 | YangTyu1 2026-03-26 | 5/250 |
|
|
|
[考研] 302求調(diào)劑 +4 | 錦衣衛(wèi)藤椒 2026-03-25 | 4/200 |
|