「関数の極限」の編集履歴（バックアップ）一覧はこちら

関数の極限 - (2016/02/04 (木) 02:10:58) の１つ前との変更点

追加された行は緑色になります。

削除された行は赤色になります。

関数の極限を表す図を描く．

&ref(limit.png,,title=,width=400,)
&ref(limit.zip)

Drwxy(); 
／／　座標軸を描く．
Deffun("f(x)",["regional(y)","y=x^2","y"]);
Plotdata("1","f(x)","x=[-2.9,2.9]");
／／　放物線を描く．
Listplot("1",[[1.2,0],[1.2,f(1.2)],[0,f(1.2)]],["do"]);
Listplot("2",[[1.8,0],[1.8,f(1.8)],[0,f(1.8)]],["do"]);
Listplot("3",[[2,0],[2,f(2)],[0,f(2)]],["do"]);
Listplot("4",[[2.2,0],[2.2,f(2.2)],[0,f(2.2)]],["do"]);
Listplot("5",[[2.8,0],[2.8,f(2.8)],[0,f(2.8)]],["do"]);
／／　点線を描く．
Ptsize(5);
Drawpoint([[2,f(2)]]);
／／　点を描く．
Setcolor([0,0,1]);
Arrowhead([1.8,f(1.8)],"gr1"); 
Arrowhead([2.2,f(2.2)],[2.2,f(2.2)]-[2.8,f(2.8)],"gr1"); 
Arrowdata([[0,f(1.2)],[0,f(1.8)]]); 
Arrowdata([[0,f(2.8)],[0,f(2.2)]]); 
Arrowdata([[1.2,0],[1.8,0]]); 
Arrowdata([[2.8,0],[2.2,0]]); 
Plotdata("2","f(x)","x=[1.2,1.8]");
Plotdata("3","f(x)","x=[2.2,2.8]");
／／　色を指定して，矢印を描く．
Setcolor([0,0,0]);
Htickmark([2,"s","2"]); 
Vtickmark([f(2),"w",text(f(2))]);
Expr([[2.9,f(2.9)],"n","y=x^2"]);

関数の極限を表す図を描く．

&ref(limit.png,,title=,width=400,)
&ref(limit.zip)

Drwxy(); 
／／　座標軸を描く．
Deffun("f(x)",["regional(y)","y=x^2","y"]);
Plotdata("1","f(x)","x=[-2.9,2.9]");
／／　放物線を描く．
Listplot("1",[ [1.2,0],[1.2,f(1.2)],[0,f(1.2)] ],["do"]);
Listplot("2",[ [1.8,0],[1.8,f(1.8)],[0,f(1.8)] ],["do"]);
Listplot("3",[ [2,0],[2,f(2)],[0,f(2)] ],["do"]);
Listplot("4",[ [2.2,0],[2.2,f(2.2)],[0,f(2.2)] ],["do"]);
Listplot("5",[ [2.8,0],[2.8,f(2.8)],[0,f(2.8)] ],["do"]);
／／　点線を描く．
Ptsize(5);
Drawpoint([[2,f(2)]]);
／／　点を描く．
Setcolor([0,0,1]);
Arrowhead([1.8,f(1.8)],"gr1"); 
Arrowhead([2.2,f(2.2)],[2.2,f(2.2)]-[2.8,f(2.8)],"gr1"); 
Arrowdata([ [0,f(1.2)],[0,f(1.8)] ]); 
Arrowdata([ [0,f(2.8)],[0,f(2.2)] ]); 
Arrowdata([ [1.2,0],[1.8,0] ]); 
Arrowdata([ [2.8,0],[2.2,0] ]); 
Plotdata("2","f(x)","x=[1.2,1.8]");
Plotdata("3","f(x)","x=[2.2,2.8]");
／／　色を指定して，矢印を描く．
Setcolor([0,0,0]);
Htickmark([2,"s","2"]); 
Vtickmark([f(2),"w",text(f(2))]);
Expr([ [2.9,f(2.9)],"n","y=x^2"]);