@点の座標 P(a,b,c) |
|
A例えば
A(0,2,1) |
|
B面のとり方 面1 AEHD |
Polygon[{ {3, 0, 0}, {0, 0, 0}, {0, 2, 0}, {3, 2, 0} }], ←面1 Polygon[{ {3, 0, 1}, {0, 0, 1}, {0, 2, 1}, {3, 2, 1} }], ←面2 Polygon[{ {3, 0, 0}, {3, 0, 1}, {3, 2, 1}, {3, 2, 0} }], ←面3 Polygon[{ {0, 0, 0}, {0, 0, 1}, {0, 2, 1}, {0, 2, 0} }], ←面4 Polygon[{ {3, 2, 0}, {3, 2, 1}, {0, 2, 1}, {0, 2, 0} }], ←面5 Polygon[{ {3, 0, 0}, {3, 0, 1}, {0, 0, 1}, {0, 0, 0} }], ←面6 |
6面以上ある場合は行をつけたそう。ここで「コピー」と「貼り付け」を使うと便利。
6面ない場合は削除する。