円に内接する正多角形と
円に外接する正多角形の描画です。
(円は描画しません)
内接の方は EnkoToubun のオプションだけで処理できます。
外接は三角関数を用いないでやってみました。

色も何もないのでガッカリ感がありかもしれませんが
お試しいただければ幸いです。

%----------------------------------------------------
\documentclass[a4j,fleqn,dvipdfmx]{jsarticle}

\usepackage[notMy]{emath}
\usepackage{emathP}

\begin{document}

%---------------------------------------
\def\内接正多角形#1#2#3#4{
\EnkoToubun<dousa=T>{#1}{#2}{#4}{+}{#3}{Q}
}

\def\外接正多角形#1#2#3#4{
\Div{180}{#3}\Arg
\rtenretu*[(0,0)]{A(#2,\Arg)}
\kandn{(0,0)}{0}\A\A\P
\Kyori{(0,0)}\P\RR
\EnkoToubun<dousa=T>{#1}{\RR}{#4}{+}{#3}{Q}
}
%-----------------------------------------
%% #1: 円の中心の座標
%% #2: 円の半径
%% #3: 正多角形の辺の数
%% #4: 多角形の頂点の代表の偏角



\begin{pszahyou*}[%
haiti=t,%
ul=4truemm,%
EPSclip=true,%
borderwidth=1mm,%
ueyohaku=1mm,%
sitayohaku=1mm,%
hidariyohaku=1mm,%
migiyohaku=1mm,%
xscale=1.0,%
yscale=1.0%
]%
(-4,21)(-6,6)%
\setlinewidth{0.3pt}%
\small%
\def\C{(0,0)}
\def\R{2}
\En\C\R
\内接正多角形\C\R{3}{90}%
\外接正多角形\C\R{3}{90}%
\def\C{(6,0)}
\def\R{2}
\En\C\R
\内接正多角形\C\R{4}{90}%
\外接正多角形\C\R{4}{90}%
\def\C{(12,0)}
\def\R{2}
\En\C\R
\内接正多角形\C\R{5}{90}%
\外接正多角形\C\R{5}{90}%
\def\C{(17,0)}
\def\R{2}
\En\C\R
\内接正多角形\C\R{6}{90}%
\外接正多角形\C\R{6}{90}%

\end{pszahyou*}%

\end{document}

▼関連発言
│
└◆1452:円に内(外)接する正多角形 [田中徹] 07/19 17:34<-last