発言者: tDB
発言日: 2008 02/10 15:19
発言元: 220.146.118.214
確認をしていただき,有難うございます。m(..)m
話題から逸れますが,表を作るには,
一行ずつ処理する
よりは
まとめて作成
した方がよい
という趣旨の話が,
Tex Q&A
50692: 2008-01-23 18:20:04 試験問題用の解答欄
からのスレッドで . さんのご投稿
50705, 50707
にあります。
それを emath流にこしらえてみました。
% --- 三角関数表 -----------------------
\documentclass[a4j]{jarticle}
\usepackage{emathT}
\usepackage{emathPl}
\begin{document}
\centerline{\Large\textbf{三角関数表}}
\medskip
\def\arraystretch{1.1}
\small
\EMedef\tbl{}%
\Ifor*\kaku{0}{45}\Do{%
\calcval[s]{emround(Degsin(\kaku),4)}\tmp\EMedefappend\tbl{\kaku\noexpand\Deg& \tmp}%
\calcval[s]{emround(Degcos(\kaku),4)}\tmp\EMedefappend\tbl{&\tmp}%
\calcval[s]{emround(Degtan(\kaku),4)}\tmp\EMedefappend\tbl{&\tmp\noexpand\\}%
\IMod\kaku{5}\amari
\ifnum\amari=0\relax\ifnum\kaku<45\relax
% \EMedefappend\tbl{&&&\noexpand\\[-6pt]}\fi\fi
\EMedefappend\tbl{\noexpand\hline}\fi\fi%
}%
\noindent
\hfill
$\begin{array}{Ir*3{|C{4em}}I}\hlineb
\hbox{角\ }&\EMvphantom*[3pt]{\EMparbox{正弦\\$(\sin)$}}&\EMparbox{余弦\\$(\cos)$}&\EMparbox{正接\\$(\tan)$}\\\hlineb
\tbl
\hlineb
\end{array}$
%
\EMedef\tbl{}%
\Ifor*\kaku{45}{90}\Do{%
\calcval[s]{emround(Degsin(\kaku),4)}\tmp\EMedefappend\tbl{\kaku\noexpand\Deg& \tmp}%
\calcval[s]{emround(Degcos(\kaku),4)}\tmp\EMedefappend\tbl{&\tmp}%
\ifnum\kaku=90\relax
\EMedefappend\tbl{&---\noexpand\\}%
\else
\calcval[s]{emround(Degtan(\kaku),4)}\tmp\EMedefappend\tbl{&\tmp\noexpand\\}%
\fi
\IMod\kaku{5}\amari
\ifnum\amari=0\relax\ifnum\kaku<90\relax
%% \EMedefappend\tbl{&&&\noexpand\\[-6pt]}\fi\fi
\EMedefappend\tbl{\noexpand\hline}\fi\fi%
}%
$\begin{array}{Ir*3{|C{4em}}I}\hlineb
\hbox{角\ }&\EMvphantom*[3pt]{\EMparbox{正弦\\$(\sin)$}}&\EMparbox{余弦\\$(\cos)$}&\EMparbox{正接\\$(\tan)$}\\\hlineb
\tbl
\hlineb
\end{array}$
\hfill\null
\end{document}
▼関連発言
│
└◆7070:\EMround がエラー [石原 守] 02/10 09:19
└◆7071:Re:\EMround がエラー [tDB] 02/10 09:42
├◆7072:Re[2]:\EMround がエラー [石原 守] 02/10 09:52
└◆7073:Re[2]:\EMround がエラー [tDB] 02/10 11:50
└◆7074:Re[3]:\EMround がエラー [石原 守] 02/10 13:21
└◆7075:Re[4]:\EMround がエラー [tDB] 02/10 15:19
└◆7076:Re[5]:\EMround がエラー [石原 守] 02/10 15:49<-last