| ■28946 / inTopicNo.5) |
Re[4]: 2直線の距離
|
□投稿者/ Skew 一般人(3回)-(2007/10/24(Wed) 22:31:29)
 | ■No28945に返信(Skewさんの記事)
> ■No28938に返信(Skewさんの記事)
>>■No28937に返信(r@PCLaboさんの記事)
> >>補足です。空間は3次元です(ので、答えには外積を使えます)。
>>
具体例（既視感：）
> http://members.tripod.com/vector_applications/distance_skew_lines/
を 別の視座から 直に；
Solve[{D[({1, 1, 3} + s*{1, 1, 0} -
({1, -1, 1} + t*{1, 3, 0})) .
({1, 1, 3} + s*{1, 1, 0} -
({1, -1, 1} + t*{1, 3, 0})), t],
D[({1, 1, 3} + s*{1, 1, 0} -
({1, -1, 1} + t*{1, 3, 0})) .
({1, 1, 3} + s*{1, 1, 0} -
({1, -1, 1} + t*{1, 3, 0})), s]} ==
{0, 0}, {s, t}]
={{s -> 1, t -> 1}}
Sqrt[({1, 1, 3} + s*{1, 1, 0} -
({1, -1, 1} + t*{1, 3, 0})) .
({1, 1, 3} + s*{1, 1, 0} -
({1, -1, 1} + t*{1, 3, 0}))] /.
{s -> 1, t -> 1}
=2
|
|