Cómo hacer un diagrama del gráfico de Petersen usando pstricks

Question

¿Cómo hago una estrella equilátera dentro de un pentágono?

Answer 1

Una posibilidad (una simple variación deeste ejemplode la galería de ejemplos de PS-Tricks):

\documentclass{article}
\usepackage{pst-poly}
\providecommand{\PstPolygonNode}{%
 \psdots[dotscale=2](1;\INode)
 \multido{\iA=0+1}{\INode}{%
   \multido{\iB=\iA+1}{\numexpr\INode-\iA+1\relax}{% 
     \psline[linecolor=blue!50](1;\iA)(1;\iB)}}}
\begin{document}

\psset{unit=2,linewidth=0.2pt}
\PstPolygon[PolyNbSides=5]

\end{document}

Answer 2

Ligeramente diferente a la respuesta de Gonzalo:

\documentclass{article}

\usepackage{pst-node,multido}

\begin{document}

\begin{pspicture}(5,5)
  \SpecialCoor
  \multido{\i=0+1}{7}{\rput{90}{\degrees[5]\pnode(1;\i){v\i}}}% Mark nodes
  \multido{\i=0+1}{5}{%
    \pcline(v\i)(v\number\numexpr\i+1)% C_5<1>
    \pcline(v\i)(v\number\numexpr\i+2)% C_5<2>
    \pscircle[fillstyle=solid,fillcolor=black](v\i){2pt}% node
  }
\end{pspicture}

\end{document}

También haypst-poly:

\documentclass{article}

\usepackage{pst-poly}

\begin{document}

\begin{pspicture}(5,5)
  \providecommand{\PstPolygonNode}{\psdots[dotsize=0.1](1;\INode)}
  \rput{90}(2,2){\PstPolygon[PolyNbSides=5]}
  \rput{90}(2,2){\PstPolygon[PolyNbSides=5,PolyOffset=2]}
\end{pspicture}

\end{document}