三角関数の値の表をつくる &ref(table_trigratio.png,,title=,width=400,) &ref(table_trigrati.cdy) Setcolor([0.2,0,0,0]); Shade(["sg1"]); Shade(["sg2"]); Setcolor("black"); // 表の左と上に網がけをする // 注)sg1,sg2は後で定義されるが,Shadeはその前におく // その方が色のはみ出しがなくてきれいに書ける xLst=[15,15,15,15,15,15,15,15,15,15]; yLst=[10,10,10,10]; rmvL=[]; Tabledata("",xLst,yLst,rmvL); // 縦横の罫線の幅リスト,消す罫線のリストを与えて // 表を作成 Tlistplot("1",["c0r1","c1r1","c1r4","c0r4","c0r1"],["nodisp"]); Tlistplot("2",["c0r0","c10r0","c10r1","c0r1","c0r0"],["nodisp"]); Tlistplot(["c5r3","c6r4"]); // グリッド点を結んだ線分を作る // 注)sg1,sg2は表示しない Putrowexpr(1,"c",["\alpha","0^{\circ}","30^{\circ}","45^{\circ}","60^{\circ}","90^{\circ}","120^{\circ}","135^{\circ}","150^{\circ}","180^{\circ}"]); Putrowexpr(2,"c",["\sin\alpha","0","\dfrac{1}{2}","\dfrac{\sqrt{2}}{2}","\dfrac{\sqrt{3}}{2}","1","\dfrac{\sqrt{3}}{2}","\dfrac{\sqrt{2}}{2}","\dfrac{1}{2}","0"]); Putrowexpr(3,"c",["\cos\alpha","1","\dfrac{\sqrt{3}}{2}","\dfrac{\sqrt{2}}{2}","\dfrac{1}{2}","0","-\dfrac{1}{2}","-\dfrac{\sqrt{2}}{2}","-\dfrac{\sqrt{3}}{2}","-1"]); Putrowexpr(4,"c",["\tan\alpha","0","\dfrac{1}{\sqrt{3}}","1","\sqrt{3}","","-\sqrt{3}","-1","-\dfrac{1}{\sqrt{3}}","0"]); // 各行ごとに数式を入れる