☰

Hacer animación de una línea recta.

tag-icon • tag-icon tikz-pgf pstricks animations
Hacer animación de una línea recta.

¿Cómo puedo hacer una animación de la línea y=-3 que gira según el ángulo $\phi$ y la distancia perpendicular desde el origen a esta línea? También necesito trazar la forma que forman los puntos de intersección de la línea con la línea perpendicular.

Lo siento, olvidé mencionar que también necesito ejes de coordenadas.

Respuesta1

\documentclass[border=10pt,pstricks]{standalone}
\usepackage{pst-node,pst-plot,pst-eucl,multido}

\begin{document}
\multido{\iA=0+6,\iB=1+1}{60}{%
\begin{pspicture}(-5.2,-5.2)(5.5,2.5)
    \pnode(0,0){O}
    \psaxes[linewidth=0.5pt]{->}(0,0)(-5,-5)(5,2)[$x$,0][$y$,90]
    \rput{\iA}(0,-3){\pnodes(-4,0){A}(4,0){B}\psline(A)(B)}
    \pnode(!\iA\space tan dup 0 eq { -3 0 }{1 exch div neg 5 mul 5} ifelse exch){C}
    \pstInterLL{A}{B}{O}{C}{D}
    \pnode(0,0){Aa}
    \multido{\iC=0+6}{\iB}{%
      \rput{\iC}(0,-3){\pnodes(-4,0){Ab}(4,0){Bb}}%
      \pnode(!\iC\space tan dup 0 eq { -3 0 }{1 exch div neg 5 mul 5} ifelse exch){Cb}%
      \pstInterLL[PointSymbol=none,PointName=none]{Ab}{Bb}{O}{Cb}{Db}%
      \psline(Aa)(Db)\pnode(Db){Aa}}%
    \psline[linestyle=dashed](0,0)(D)
\end{pspicture}%
}
\end{document}

Convertido en gifcon:

convert -delay 50 -loop 0 -density 200 -scale 350 -alpha remove test.pdf test.gif

ingrese la descripción de la imagen aquí

información relacionada