「円群の包絡線」の編集履歴(バックアップ)一覧はこちら
円群の包絡線 - (2016/03/08 (火) 11:03:19) の1つ前との変更点
追加された行は緑色になります。
削除された行は赤色になります。
=============================================
円群の包絡線 16.01.30 hourakusen1.cdy
x軸上に中心を持つ半径1の円群の図
&ref(hourakusen1.png,,title=,width=400,)
&ref(hourakusen1.zip)
Setcolor("cyan");
//円群の色を指定
repeat(21,k,
Circledata(text(k),[[(k-11)*0.25,0],[(k-11)*0.25,1]]);
);
//原点中心の円の左右に10個ずつの円を描く(中心を2.5mmずつずらした)
Setcolor("black");
Lineplot([A,B],["dr,1.5"]);
Lineplot([C,D],["dr,1.5"]);
//包絡線となる直線を太さ1.5で描く
Vtickmark([1,"n1w","1",-1,"s1w","-1"]);
//y軸に目盛りを記入