Advertisement
nm9505

ESFERA TERRESTRE EN TIKZ-3D

Jan 27th, 2023 (edited)
1,880
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Latex 2.22 KB | Science | 0 0
  1. \documentclass[a4paper]{article}
  2. \usepackage[a4paper,lmargin=1cm,rmargin=1cm,bottom=1cm,top=1cm]{geometry}
  3. %Paquete para Referencias Web
  4. \usepackage [colorlinks=true,linkcolor=green! 40!blue,citecolor=green!40!blue,filecolor=magenta, urlcolor= green!80!blue!80!black]{hyperref}
  5. %Paquete de estilo de Referencias
  6. \urlstyle{same}
  7. \usepackage{tikz,tikz-3dplot}
  8.  
  9. \tikzstyle{point}=[inner sep=0pt, outer sep=0pt, minimum size=2pt,fill=black,shape=circle]
  10.  
  11. \begin{document}
  12. \noindent
  13. \Large{\textcolor{blue}{Esfera Terrestre:}\\
  14. \textcolor{red}{Tikz-3D}}\\
  15. \tdplotsetmaincoords{92}{120}
  16. %EliminandoNumeracionDeFigura
  17. \renewcommand{\thefigure}{}
  18. \begin{figure}[ht!]
  19. \begin{tikzpicture} [scale=6.5,opacity=0.8, rotate=-10]
  20. \begin{scope}[tdplot_main_coords]
  21. \tdplotsphericalsurfaceplot[smooth]{20}{24}{1}{white}{green!50!blue}
  22.  
  23. {\draw[color=blue,thick,->] (0,0,1) to (0,0,1.5) node[anchor=south]{Eje terrestre imaginario};}
  24.  
  25. {\draw[color=blue,very thick,-,dashed] (0,0,-1) to (0,0,1);}
  26. {\draw[color=blue, ultra thick,->] (0,0,-1) to (0,0,-1.5);}
  27. %Circulos Tropicales
  28. \tdplotsinandcos{\sintheta}{\costeta}{23.5}
  29. \path[draw, blue,fill=red!20] (0,0, \sintheta ) circle (26*\costheta ) node[below=0.1cm, black, rotate=-9] {\bf{\textcolor{black}{Trópico de Cáncer (23°27' Norte)}}};
  30. \path[draw, orange, fill=red!20] (0,0,-\sintheta) circle (26*\costheta) node[above, black, rotate=-9] {\bf{\textcolor{black}{Trópico de Capricornio (23°27' Sur)}}};
  31. \path[draw, green!80!blue!70!black, ultra thick,fill=red!20] (0,0,0) circle (1)node[below, black, rotate=-9] {\bf{\textcolor{black}{ZONA ECUATORIAL}}};
  32. \draw node  at (0,0,0)(O){};
  33. \end{scope}
  34. %Numeracion de latitudes
  35. \foreach \a in {-72,-54,...,72}
  36. {
  37. \tdplotsinandcos{\sintheta}{\costeta}{\a}
  38. \draw node[blue] at (\costheta,\sintheta,0 ) {$\a$ };
  39. }
  40. %Numeracion de longitudes
  41. \foreach \b in {75,60,...,-75}
  42. {
  43. \tdplotsinandcos{\sintheta}{\costeta}{\b}
  44. \draw node[red,above=0.15cm] at (\sintheta,\costheta,0 ) {$\b$ };
  45. }
  46. %Sentido de Rotación
  47. \tdplotdefinepoints(0,1.2,0)(2,0,0.4)(-9,0,0.4)
  48. \tdplotdrawpolytopearc[->,ultra thick,red]{0.4}{below=10pt}{Rotación}
  49. \end{tikzpicture}
  50. \caption{La esfera terrestre mediante el paquete \texttt{tikz-3D}}
  51. \end{figure}
  52.  
  53. \end{document}
  54.  
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement