発言者: 飯島 徹
発言日: 2005 06/11 01:12
発言元: yahoobb221029028014.bbtec.net
穂積さん,zyam56 さん,みなさん,こん○○は(^^♪飯島です.
私も zyam56 さんと同様にあまり気になりませんよ.
ただ,私なら次のようにします.
山3つを別々の zahyou 環境でつくり
haiti=c や migiyohaku,hidariyohaku で
適当にごまかします(^^ゞ
\documentclass{jarticle}
\usepackage{emathPp,emathPa}
\begin{document}
\makeatletter
\def\Heihouwa{\@ifnextchar[{\@Heihouwa}{\@Heihouwa[5mm]}}%
\def\Heihouwa[#1]#2#3{%
{%
\def\UL{#1}%
\def\sqiii{1.7320508}%
\def\dansuu{#3}%
\if#2t\relax
\calcval{(\dansuu-1)*(-1)}\Xm
\calcval{\dansuu-1}\XM
\calcval{(\dansuu-1)*\sqiii*(-1)}\Ym
\def\YM{0}%
\edef\Vi{(-1,-\sqiii)}%
\edef\Vii{(1,-\sqiii)}%
\else
\if#2l\relax
\def\Xm{0}%
\calcval{(\dansuu-1)*2}\XM
\def\Ym{0}%
\calcval{(\dansuu-1)*\sqiii}\YM
\def\Vi{(2,0)}%
\def\Vii{(1,\sqiii)}
\else
\if#2r\relax
\def\XM{0}%
\calcval{(\dansuu-1)*(-2)}\Xm
\def\Ym{0}%
\calcval{(\dansuu-1)*\sqiii}\YM
\def\Vi{(-2,0)}%
\def\Vii{(-1,1.7320508)}
\fi
\fi
\fi
\begin{zahyou*}%
[ul=\UL,migiyohaku=1,hidariyohaku=1,haiti=c]%
(\Xm,\XM)(\Ym,\YM)%
\small
\begin{azahyou}[(0,0)]\Vi\Vii
\IAdd\dansuu1\ne
\Ifor\n1\ne\Do{%
\Ifor\m\n0[-1]\Do{%
\ISub\m1\x
\ISub\n\x\y
\ISub\y1\y
\azPut{(\x,\y)}[r](0pt,0){\n}%
\azPut{(\x,\y)}[r](0pt,0){\En\O1}%
}%
}%
\end{azahyou}
\end{zahyou*}
}%
}%
\makeatother
\[
\Heihouwa[3mm]{t}{5}%
+\Heihouwa[3mm]{l}{5}%
+\Heihouwa[3mm]{r}{5}%
\]
\end{document}
▼関連発言
│
└◆3218:自然数の平方の和の図 [穂積] 06/10 22:14
├◆3219:Re:自然数の平方の和の図 [zyam56] 06/11 01:04
│└◆3222:Re[2]:自然数の平方の和の図 [穂積] 06/11 05:20<-last
└◆3220:Re:自然数の平方の和の図 [飯島 徹] 06/11 01:12
└◆3221:Re[2]:自然数の平方の和の図 [飯島 徹] 06/11 01:54