ベクトルの正射影 - KeTCindyによる図入り教材の作成

ベクトルの正射影を説明する図を描く．

#ref error ：ご指定のファイルが見つかりません。ファイル名を確認して、再度指定してください。 (title=)

orthogonal-projection-vector.zip

• 画面で3点A,B,Cをとる．
• 線分AB, ACを加え，点Cを通りABに垂直な垂線cを描く．
• 線分ABと垂線cの交点Dをとる．

Addax(0);

Arrowdata([A,B],[2,10]);
Arrowdata([A,C],[2,10]);

Paramark([A,D,C]);
／／　角ADCに直角記号を書く．
Anglemark([B,A,C],["E=\theta"]);
／／　角BACに角の記号を書き，数式$\theta$を書く．

Letter([A,"w1","O",B,"e1","A",C,"ne","B",D,"s1","H"]);
Expr([E,"s2","\vec{a}",F,"nw","\vec{b}"]);

Setcolor("cyan");
／／線や文字の色をcyan（青）に変更する．
Listplot([C,D],["da"]);
Arrowdata([A,D],[2,10]);
Expr(G,"s2","\vec{h}");
Setcolor("black");
／／注）　線や文字の色を黒に戻す．