使用 TikZ 在類似時鐘的圖表上的節點之間的和弦

使用 TikZ 在類似時鐘的圖表上的節點之間的和弦

我正在嘗試創建一系列鐘面插圖,其中節點之間有和弦。我想從 12 點鐘位置開始,然後重複在 n 個位置處的數字上繪製和弦,直到返回到 12(例如,如果 n 是 3,我希望鐘面上的和弦從 12- 3-6-9- 12;如果n 是5,我想要12-5-10-3-8-1-6-11-4-9-2-7-12)。

根據我在網路上找到的其他程式碼,我正在繪製這樣的時鐘:

\newcommand{\TikZMGClockMath}[2]{% Diameter; num. of nodes to skip
  \pgfmathsetmacro{\angle}{360/12};%
  \draw (0,0) circle (#1);

  \foreach \i in {1,...,12} {
    \begin{scope}[rotate=-\i * \angle]
    \node (p\i) at (0,#1) {$\bullet$};
    \node at (0,#1+0.3) {\i};
    \end{scope}
  }
}

\begin{tikzpicture}
\TikZMGClockMath{3}{3}
\end{tikzpicture}

我希望這能讓我輕鬆創建一系列要遍歷的節點(例如,p12--p5--p10--,...,--p12),但作為 TikZ 的新手,該任務已被證明是超越我。在標準程式語言中,我想我會使用 mod() 建立一個數組,但我不確定如何在這裡實現這一​​點。任何關於我如何做到這一點的建議將不勝感激。

答案1

啊,打擊樂更快,但這裡有一個稍微不同的版本,它使用 Peter Grill 的答案中的程式碼自動添加分數並減少結果(如果需要)計算12的最大公約數和步長,可以用來確定我們需要繪製的線數。當然,我們總是可以只繪製 12 條線,但這會導致某些線被繪製多次。

\documentclass[12pt]{article}
\usepackage{tikz}
\usetikzlibrary{positioning}

\makeatletter
\def\gcd#1#2{{% #1 = a, #2 = b
    \ifnum#2=0 \edef\next{#1}\else
        \@tempcnta=#1 \@tempcntb=#2 \divide\@tempcnta by\@tempcntb
        \multiply\@tempcnta by\@tempcntb  % q*b
        \@tempcntb=#1
        \advance\@tempcntb by-\@tempcnta % remainder in \@tempcntb
        \ifnum\@tempcntb=0
            \@tempcnta=#2
            \ifnum\@tempcnta < 0 \@tempcnta=-\@tempcnta\fi
            \xdef\gcd@next{\noexpand%
                \def\noexpand\thegcd{\the\@tempcnta}}%
        \else
            \xdef\gcd@next{\noexpand\gcd{#2}{\the\@tempcntb}}%
        \fi
    \fi}\gcd@next
}
\makeatother

\begin{document}
\newcommand{\TikZMGClockMath}[2]{% Diameter; num. of nodes to skip
  \draw (0,0) circle (#1);

  \foreach \i in {1,...,12} {
    \path (-360/12*\i+90:#1)
        node (p\i) [circle,fill,inner sep=2pt] {}
        node [anchor=180-360/12*\i+90] {\i};
  }
  \gcd{12}{#2}
  \pgfmathtruncatemacro\steps{12/\thegcd}  

  \foreach \pos in {1,...,\steps}{
    \pgfmathtruncatemacro\start{Mod(#2*(\pos-1)-1,12)+1}
    \pgfmathtruncatemacro\end{Mod(#2*(\pos)-1,12)+1}
    \draw [thick,red] (p\start) -- (p\end);
  }
}

\noindent
\foreach \stepsize in {1,...,12}{%
\begin{tikzpicture}
\TikZMGClockMath{1}{\stepsize}
\end{tikzpicture}
}





\end{document}

答案2

我添加了一個\foreach循環,但沒有太強調外觀。另外,為了看看它是否真的正常工作,我透過等方式添加了箭頭,[-latex]因此您可能需要刪除它們或用更好看的箭頭進行更改。

\documentclass{standalone}
\usepackage{tikz}
\newcommand{\TikZMGClockMath}[2]{% Diameter; num. of nodes to skip
  \pgfmathsetmacro{\angle}{360/12};%
  \draw (0,0) circle (#1);

  \foreach \i in {1,...,12} {
    \begin{scope}[rotate=-\i * \angle]
    \node[inner sep=1pt,fill,circle] (p\i) at (0,#1) {};
    \node at (0,#1+0.3) {\i};
    \end{scope}
  }
\draw[-latex] (p12) -- (p#2);
\foreach \x[remember=\x as \lastx (initially 1)] in {2,...,12}{
\pgfmathtruncatemacro{\modtwelve}{mod(#2*\x,12)}
\pgfmathtruncatemacro{\lastmodtwelve}{mod(#2*\lastx,12)}
\ifnum\modtwelve>0\relax
\draw[latex-] (p\modtwelve) -- (p\lastmodtwelve);
\else
\draw[latex-] (p12) -- (p\lastmodtwelve);
\breakforeach
\fi
}
}
\begin{document}
\begin{tikzpicture}
\TikZMGClockMath{3}{7}
\begin{scope}[xshift=7cm]
\TikZMGClockMath{3}{10}
\end{scope}
\begin{scope}[xshift=14cm]
\TikZMGClockMath{3}{5}
\end{scope}
\begin{scope}[yshift=7cm]
\TikZMGClockMath{3}{3}
\end{scope}
\begin{scope}[shift={(7cm,7cm)}]
\TikZMGClockMath{3}{4}
\end{scope}
\begin{scope}[shift={(14cm,7cm)}]
\TikZMGClockMath{3}{6}
\end{scope}
\end{tikzpicture}
\end{document}

在此輸入影像描述

相關內容