emath BBS

新規発言一覧最新記事過去一覧検索HOME

No.4174  Re:空間内の球の表現
発言者: tDB
発言日: 2005 12/27 11:02
発言元: 125.2.17.217
円を描画して,切断面でふくらみを示すのはどうでしょうか。

下の例では,空間座標を用いていますが,
この程度なら平面座標でも十分でしょう。

P.S. debug オプションをつけたままですから,
  最終的には除去してください。

% --- re4173.tex --------------------------------------------
\documentclass{jarticle}
\usepackage{emathPk}
\usepackage{emathPs}

\begin{document}
\Rdef(.4,-90)\Ex
\begin{psZahyou*}[debug,ul=20mm,Ex=\Ex,borderwidth=2pt](-1,2)(-2,2)(0,2)
  \iiitenretu{N(0,0,2)n;S(0,0,0)s;A(1.414,-1.414,0)w;B(1.414,1.414,0)e}
  \iiitenretu*{C(0,0,1)}
  \iiiBunten\N\A11\AA
  \iiiBunten\N\B11\BB
  \def\Ct{cos(T)}
  \def\St{1+sin(T)}
  \iiiBGurafu{0}\Ct\St{0}{2*$pi}
  \iiiBGurafu{cos(T)}{sin(T)}{1}{-$pi/2}{$pi/2}
  \def\argP{.2}
  \iiiBTen{cos(T)}{sin(T)}{1}{\argP}\Q\iiiPut\Q[se]{Q}
  \def\Xt{2*cos(T)}
  \def\Yt{2*sin(T)}
  \iiiBGurafu\Xt\Yt0{-$pi/4}{$pi/4}
  \iiiBTen\Xt\Yt0{\argP}\P\iiiPut\P[se]{P}\iiikuromaru{\P;\Q}
  \iiiDrawline{\N\P}
  \setlinejoin{1}
  \iiiTakakkei{\S\A\B}
  \iiiDrawline{\A\N\B}
  \setdash{.02,.05}
  \iiiTakakkei{\C\AA\BB}
  \iiiBGurafu{cos(T)}{sin(T)}{1}{$pi/2}{3*$pi/2}
  \setdash{.01,.02,.05,.02}
  \iiiDrawline{\N\S}
\end{psZahyou*}
\end{document}

▼関連発言

4173:空間内の球の表現 [ban] 12/26 23:23
 └4174:Re:空間内の球の表現 [tDB] 12/27 11:02
  └4175:Re[2]:空間内の球の表現 [田中徹] 12/27 12:28
   └4176:Re[3]:空間内の球の表現(感謝) [ban] 12/27 12:57<-last

Pass 保存


CGIROOM