 |
 |
 |
 |
 |
 |
||
 |
 |
 |
 |
 |
| 5 | 1/1 | 返回列表 |
| 查看: 709 | 回復(fù): 3 | |||
| 當(dāng)前只顯示滿足指定條件的回帖，點(diǎn)擊這里查看本話題的所有回帖 | |||
astringent銅蟲(chóng) (著名寫(xiě)手)
|
[交流]
【求助】關(guān)于向量投影的問(wèn)題 已有2人參與
|
||
|
有兩個(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)軸方向的位移。我寫(xiě)了一個(gè)程序，勞煩大家?guī)兔纯矗@個(gè)程序有沒(méi)有問(wèn)題以及能不能實(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 [ Last edited by ghcacj on 2011-1-21 at 20:42 ] |
回復(fù)此樓» 猜你喜歡
277跪求調(diào)劑
已經(jīng)有11人回復(fù)
-
一志愿北京化工大學(xué)材料與化工（085600）296求調(diào)劑
已經(jīng)有18人回復(fù)
-
求調(diào)劑
已經(jīng)有6人回復(fù)
-
0703化學(xué)
已經(jīng)有14人回復(fù)
-
面上5B能上會(huì)嗎？
已經(jīng)有7人回復(fù)
-
0703本科鄭州大學(xué)求調(diào)劑
已經(jīng)有7人回復(fù)
-
286分調(diào)劑
已經(jīng)有3人回復(fù)
-
0703化學(xué)/290求調(diào)劑/本科經(jīng)歷豐富/工科也可
已經(jīng)有15人回復(fù)
-
317分 一志愿南理工材料工程 本科湖工大 求調(diào)劑
已經(jīng)有11人回復(fù)
-
332求調(diào)劑
已經(jīng)有12人回復(fù)
» 本主題相關(guān)價(jià)值貼推薦，對(duì)您同樣有幫助:
- 【求助】關(guān)于向量投影的問(wèn)題
已經(jīng)有3人回復(fù)
astringent
銅蟲(chóng) (著名寫(xiě)手)
- 應(yīng)助: 16 (小學(xué)生)
- 金幣: 2210.7
- 散金: 1233
- 紅花: 4
- 帖子: 1180
- 在線: 354.8小時(shí)
- 蟲(chóng)號(hào): 900839
- 注冊(cè): 2009-11-12
- 專業(yè): 理論和計(jì)算化學(xué)
4樓2011-01-22 05:28:39
老虎大王
木蟲(chóng) (著名寫(xiě)手)
- 模擬EPI: 17
- 應(yīng)助: 26 (小學(xué)生)
- 貴賓: 0.17
- 金幣: 4774.1
- 散金: 8
- 紅花: 42
- 帖子: 1361
- 在線: 215.2小時(shí)
- 蟲(chóng)號(hào): 659094
- 注冊(cè): 2008-11-21
- 專業(yè): 金屬結(jié)構(gòu)材料
2樓2011-01-21 17:45:12
老虎大王
木蟲(chóng) (著名寫(xiě)手)
- 模擬EPI: 17
- 應(yīng)助: 26 (小學(xué)生)
- 貴賓: 0.17
- 金幣: 4774.1
- 散金: 8
- 紅花: 42
- 帖子: 1361
- 在線: 215.2小時(shí)
- 蟲(chóng)號(hào): 659094
- 注冊(cè): 2008-11-21
- 專業(yè): 金屬結(jié)構(gòu)材料
3樓2011-01-21 17:46:58
| 最具人氣熱帖推薦 [查看全部] | 作者 | 回/看 | 最后發(fā)表 | |
|---|---|---|---|---|
|
[考研] 求調(diào)劑 +6 | 青春裁為三截 2026-03-29 | 6/300 |
|
|---|---|---|---|---|
|
[考研] 295求調(diào)劑 +5 | wei-5 2026-03-26 | 5/250 |
|
|
|
[考研] 085600 286分 材料求調(diào)劑 +10 | 麻辣魷魚(yú) 2026-03-27 | 11/550 |
|
|
|
[考研] 各位老師好，我的一志愿為北京科技大學(xué)085601材料專碩 +9 | Koxui 2026-03-28 | 9/450 |
|
|
|
[考研] 材料學(xué)碩333求調(diào)劑 +11 | 北道巷 2026-03-24 | 11/550 |
|
|
|
[考研] 305求調(diào)劑 +8 | RuiFairyrui 2026-03-28 | 8/400 |
|
|
|
[考研] 一志愿211 初試270分 求調(diào)劑 +8 | 谷雨上岸 2026-03-23 | 9/450 |
|
|
|
[考研] 材料與化工（0856）304求B區(qū)調(diào)劑 +8 | 邱gl 2026-03-27 | 8/400 |
|
|
|
[考研] 085701環(huán)境工程，267求調(diào)劑 +16 | minht 2026-03-26 | 16/800 |
|
|
|
[考研] 考研調(diào)劑 +4 | Sanmu-124 2026-03-26 | 4/200 |
|
|
|
[考研] 一志愿南師大0703化學(xué) 275求調(diào)劑 +4 | Ripcord上岸 2026-03-27 | 4/200 |
|
|
|
[考研] 0856調(diào)劑 +5 | 求求讓我有書(shū)讀?/a> 2026-03-26 | 6/300 |
|
|
|
[考研] 考研調(diào)劑 +10 | 呼呼？~+123456 2026-03-24 | 10/500 |
|
|
|
[考研] 0703化學(xué)338求調(diào)劑！ +6 | Zuhui0306 2026-03-26 | 7/350 |
|
|
|
[考研] 324求調(diào)劑 +8 | hanamiko 2026-03-26 | 10/500 |
|
|
|
[考研] 生物學(xué) 296 求調(diào)劑 +4 | 朵朵- 2026-03-26 | 6/300 |
|
|
|
[考研] 環(huán)境專碩324分求調(diào)劑推薦 +5 | 軒小寧—— 2026-03-26 | 5/250 |
|
|
|
[考研] 309求調(diào)劑 +4 | gajsj 2026-03-25 | 5/250 |
|
|
|
[考研] 285求調(diào)劑 +3 | AZMK 2026-03-24 | 3/150 |
|
|
|
[考研] 293求調(diào)劑 +7 | 加一一九 2026-03-24 | 7/350 |
|