球体和悬链线中的切比雪夫网络

Question

你好，我有在 Latex 中写文字的经验，但是在使用 Latex 绘图方面我还是新手，我曾努力尝试制作这些图形，但没有成功。

\documentclass[crop,tikz]{standalone}
\usepackage{pgfplots}
\usepackage{pgfplotstable}
\usepackage{tikz-3dplot}
\usepackage{amsmath}
\usepackage{amssymb}

\usepgfplotslibrary{fillbetween}

\def \plotwidth {510.0pt}

\definecolor{color0}{RGB}{0,153,216}

\pgfplotsset{compat=1.12}
\pgfplotsset{ticks=none}

\begin{document}
\begin{tikzpicture}
\begin{axis}[
    view/h=45,
    axis equal,
    axis lines=center,
]
    \addplot3[surf, opacity=0.5, samples=30, domain=-1:1, y domain=0:2*pi, z buffer=sort] ({sqrt(1-x^2) * cos(deg(y))}, {sqrt( 1-x^2 ) * sin(deg(y))}, x);
\end{axis}
\end{tikzpicture}
\end{document}

输出：

很抱歉给您带来不便，我只是个初学者。我尝试以 RGB={0,153,216} 制作这些图形。非常感谢您的各种帮助，另一方面，如果有人知道一本葡萄牙语或西班牙语的书来学习如何在 latex 中绘图，我将不胜感激。

Answer 1

这看起来像你给出的球体。但我很确定这不是一个边长相等的网。

也许您可以为我们指出具有适当参数化的参考。我用谷歌找到的都是法语的。

\documentclass[border=9,tikz]{standalone}
\usepackage{pgfplots}
\pgfplotsset{compat=1.18}
\begin{document}
\begin{tikzpicture}
    \makeatletter
    \def\mdef{\pgfmathsetmacro}
    \def\r{10} % radius
    \begin{axis}[height=20cm, view/h=45, axis equal, axis lines=center]
        \addplot3[
            samples=20, domain=-60:60, unbounded coords=jump,
            surf, opacity=.7, z buffer=sort,
            pre filter/.code={
                \edef\u{\pgfplots@current@point@x@unfiltered} % parametric plot's #1
                \edef\v{\pgfplots@current@point@y@unfiltered} % parametric plot's #2
                \mdef\theta{\u + \v} % azimuth
                \mdef\phi{\u - \v} % elevation
                \mdef\TooCloseToPole{ \phi > 85 ? 1 : (\phi < -85) ? 1 : 0 }
                \if1\TooCloseToPole
                    \mdef\pgfplots@current@point@z{nan}
                \else
                    \mdef\cosphi{cos(\phi)}
                    \mdef\pgfplots@current@point@x{\r * \cosphi * cos(\theta)}
                    \mdef\pgfplots@current@point@y{\r * \cosphi * sin(\theta)}
                    \mdef\pgfplots@current@point@z{\r * sin(\phi)}
                \fi
            }
        ]
        (\x, \y, 0);
\end{axis}
\end{tikzpicture}
\end{document}