Método de atalho para desenhar vários pontos com rótulo em uma curva

Question

Consideremos o seguinte exemplo:

\documentclass{article}
\usepackage{tikz}
\begin{document}
\begin{tikzpicture}[scale=.6pt]
\draw (1,0)--(20,0); 
\foreach \x in {1,...,20}{
\draw[fill] (\x,0) circle (1.5pt);
}   
\foreach \x/\a in {1/1,2/2,3/3,4/4,5/5,6/6,7/7,8/8,9/9,10/10,11/11,12/12,13 /13,14/14,15/15,16/16,17/17,18/18,19/19,20/20}{
\node[below] at (\x,0) {\a};
}
\end{tikzpicture}
\end{document}

Isso produz

Sempre que uso a seguinte técnica de atalho ocorre erros.

\foreach \x/\a in {1/1,...,20/20}{
  \node[below] at (\x,0) {\a};
 }

Como posso fazer isso pelo método de atalho?

Answer 1

Use o mesmo contador para fazer a etiqueta.

 \draw[fill] (\x,0)node[below]{$\x$} circle (1.5pt);

 \documentclass{article}
 \usepackage{tikz}
 \begin{document}
 \begin{tikzpicture}[scale=.6]
 \draw (1,0)--(20,0); 
 \foreach \x in {1,...,20}{
 \draw[fill] (\x,0)node[below]{$\x$} circle (1.5pt);
 }   
 \end{tikzpicture}
 \end{document}

obs:só para informar, você pode controlar a distância entre a etiqueta e o ponto usando below=5ptpor exemplo.

Answer 2

Apenas por diversão com PSTricks.

\documentclass[pstricks,border=12pt]{standalone}
\begin{document}
\begin{pspicture}(20,2)
\psline(0,1)(20,1)
\foreach \x in {0,...,20}{\qdisk(\x,1){2pt}\uput{10pt}[-90](\x,1){$\x\mathstrut$}}
\end{pspicture}
\end{document}

Answer 3

Uma solução PSTricks com a ajuda do poderosoxfppacote:

\documentclass{article}

\usepackage{pstricks-add}
\usepackage{xfp}

\newcommand*\Total{\fpeval{\maxNumber+1}}
\newcommand*\Unit{\fpeval{11.5/\maxNumber}}

\def\maxNumber{20}


\begin{document}

\begin{pspicture}(0,-0.35)(11.6,0)
\psset{unit = \Unit}
  \psline(0,0)(\maxNumber,0)
  \multido{\i = 0+1}{\Total}{%
    \psdot(\i,0)
    \uput[270](\i,0){\small $\i$}}
\end{pspicture}

\end{document}

Observe que basta escolher o valor de \maxNumbere então o desenho será ajustado automaticamente.