発言者: 田中徹
発言日: 2005 01/16 00:42
発言元: p6e1e66.nigtnt01.ap.so-net.ne.jp
> \sin \theta のグラフを書くプリントを作りたいのですが、
生徒の作業用プリントでしょうか??
中途半端ですが
縦線の間隔や本数など変更可能にしたソースです。
ラベルはまったくなしの手抜きです。
(授業では生徒に記入させています。)
# お元気そうで何よりです > 飯島さん
\documentclass[b4j]{jarticle}
\usepackage{emath}
\usepackage{emathP}
\pagestyle{empty}
\oddsidemargin=-12mm
%%%%%%%%%%%%%%%%%%%%%%%
\def\Col{red}
\def\Size{1.5}
\Mul\Size{7}\HSize
\Mul\Size{1.2}\Hajime
\def\Hankei{1}
\def\Tate{25}
\def\Haba{0.2}
%%%%%%%%%%%%%%%%%%%%%%%%
\def\O{(0,0)}
\begin{document}
\begin{zahyou*}%
[ul=20mm]%
(-\Size,\HSize)(-\Size,\Size)%
\Drawlines{(-\Size,0)(\Size,0)}%
\Drawlines{(0,-\Size)(0,\Size)}%
\En\O\Hankei%
\thinlines%
%------縦
\def\RL{(\Hajime,-\Size)}
\def\RH{(\Hajime,\Size)}
\ArrowLine\RL\RH%
\xdef\PosL{\RL}
\xdef\PosH{\RH}
\IAdd\Tate{1}\TateCnt
\Ifor\Cnt{1}{\TateCnt}\Do{%
\Addvec\PosL{(\Haba,0)}\PosL%
\Addvec\PosH{(\Haba,0)}\PosH%
\IMod\Cnt{6}\Modvi
\ifnum\Modvi=0
\Drawlines{\PosL\PosH}%
\else
\begin{color}{\Col}%
\Dashline[40]{0.05}{\PosL\PosH}%
\end{color}%
\fi
}
%-----単位円
\vecXY\PosL\Lx\Ly
\Ifor\Kaku{0}{360}[15]\Do{%
\kyokuTyoku(\Hankei,\Kaku)\A%
\IMod\Kaku{30}\Modii%
\ifnum\Modii=0%
\Dashline[20]{0.05}{\O\A}%
\ifnum\Kaku>89\ifnum\Kaku<271
\vecXY\A\Ax\Ay%
\Dashline[100]{0.02}{\A(\Lx,\Ay)}%
\fi\fi%
\else%
\begin{color}{\Col}%
\Dashline[20]{0.05}{\O\A}%
\ifnum\Kaku>89\ifnum\Kaku<271
\vecXY\A\Ax\Ay%
\Dashline[100]{0.02}{\A(\Lx,\Ay)}%
\fi\fi%
\end{color}%
\fi%
}
\Addvec\PosL{(\Haba,0)}\PosL%
\Addvec\PosH{(\Haba,0)}\PosH%
\Bunten\PosL\PosH{1}{1}\OwariPos
\ArrowLine{(\Hajime,0)}\OwariPos%
\end{zahyou*}%
\end{document}
▼関連発言
│
└◆2464:三角関数のグラフ [kimu] 01/15 22:43
├◆2465:Re:三角関数のグラフ [飯島 徹] 01/15 23:45
├◆2466:--- [---] 01/16 00:41
├◆2467:Re:三角関数のグラフ [田中徹] 01/16 00:42
└◆2469:Re:三角関数のグラフ [石原 守] 01/16 07:00
└◆2470:Re[2]:三角関数のグラフ [石原 守] 01/16 08:26
└◆2479:Re[3]:三角関数のグラフ [kimu] 01/16 19:10<-last