指数関数のグラフ - KeTCindyによる図入り教材の作成

y=2^x のグラフの平行移動．

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

expgraphtranslation.zip

Deffun("f(x)",["regional(y)","y=2^x","y"]);
Deffun("g(x)",["regional(y)","y=2^(x-1)","y"]);
Setcolor([0,0,1]);
Plotdata("1","f(x)","x");
Setcolor([0,0,0]);
Plotdata("2","g(x)","x");
／／　Setcolor([0,0,1]);で青色になる．
／／　描画面でも着色したい場合は，オプション"color->[0,0,1]" を用いる．
／／　Setcolor([0,0,1]);で黒に戻しておく．
Listplot("1",[ [1,0],[1,f(1)],[0,f(1)] ],["do"]);
Listplot("2",[ [2,0],[2,f(2)],[0,f(2)] ],["do"]);
Listplot("3",[ [1,0],[1,g(1)],[0,g(1)] ],["do"]);
Listplot("4",[ [2,0],[2,g(2)],[0,g(2)] ],["do"]);
Listplot("5",[ [3,0],[3,g(3)],[0,g(3)] ],["do"]);
Htickmark([1,"s","1",2,"s","2",3,"s","3"]);
Vtickmark([g(1),"nw",text(g(1)),g(2),"w",text(g(2)),g(3),"w",text(g(3))]);
／／　点の座標がわかるように点線を描いて座標を書く．
Expr([A,"e","y=2^x"]);
Expr([B,"e","y=2^{x-1}"]);
／／　点A の位置に関数の式を書く．
Setcolor([0,0,1]);
Arrowdata([C,D]);
／／　Arrowdata([C,D],["color->[0,0,1]"]);
Setcolor([0,0,0]);
／／　点C から 点D に向かう矢印を青色で描く．