☰

Tikz：不使用欧几里得包使用两个点指定圆的半径

tag-icon • tag-icon tikz-pgf
Tikz：不使用欧几里得包使用两个点指定圆的半径

我使用 a 和 b 定义两个点\coordinate。然后我尝试绘制以 a 为圆心，以 ab 为半径的圆。我尝试了 3 次，请参阅下面的代码

  1. 有点天真，不起作用
  2. 使用https://tex.stackexchange.com/a/58287，不起作用
  3. 使用https://tex.stackexchange.com/a/38500这会生成一个半径很大的圆。

有没有办法让这三种方法都奏效？越简单越好。

\documentclass{article}
\usepackage{tkz-euclide}
\usetkzobj{all}
\usetikzlibrary{calc,patterns,angles,quotes,intersections}

\makeatletter
\def\calcLength(#1,#2)#3{%
\pgfpointdiff{\pgfpointanchor{#1}{center}}%
             {\pgfpointanchor{#2}{center}}%
\pgf@xa=\pgf@x%
\pgf@ya=\pgf@y%
\FPeval\@temp@a{\pgfmath@tonumber{\pgf@xa}}%
\FPeval\@temp@b{\pgfmath@tonumber{\pgf@ya}}%
\FPeval\@temp@sum{(\@temp@a*\@temp@a+\@temp@b*\@temp@b)}%
\FProot{\FPMathLen}{\@temp@sum}{2}%
\FPround\FPMathLen\FPMathLen5\relax
\global\expandafter\edef\csname #3\endcsname{\FPMathLen}
}
\makeatother

\begin{document}

Attempt 1:

\begin{center}
\begin{tikzpicture}[]
\coordinate (a) at (0,0);
\coordinate (b) at (1.3,1.5);
\draw (a) circle (2);
\draw (a) circle ($(b)-(a)$);
\end{tikzpicture}
\end{center}

Attempt 2:

\begin{center}
\begin{tikzpicture}[]
\coordinate (a) at (0,0);
\coordinate (b) at (1.3,1.5);
\draw (a) circle (2);
% https://tex.stackexchange.com/a/58287
\draw 
  let
  \p1 = (a),
  \p2 = (b),
  \n1 = {veclen((\x2-\x1),(\y2-\y1))}
(a) circle ({\n1});
\end{tikzpicture}
\end{center}

Attempt 3:

\begin{center}
\begin{tikzpicture}[]
\coordinate (a) at (0,0);
\coordinate (b) at (1.3,1.5);
\draw (a) circle (2);
% https://tex.stackexchange.com/a/38500
\calcLength(a,b){mylen}
\draw (a) circle (\mylen);
\end{tikzpicture}
\end{center}


\end{document}

答案1

第一次尝试稍作修改即可。如果添加缺失部分，第二次尝试同样有效in（并且可能想要切换到现代语法circle[radius=<radius>]）。

\documentclass{article}
\usepackage{tikz}
\usetikzlibrary{calc}

\begin{document}

Attempt 1 slightly modified:

\begin{center}
\begin{tikzpicture}
\coordinate (a) at (0,0);
\coordinate (b) at (1.3,1.5);
\draw let \p1=($(b)-(a)$),\n1={veclen(\x1,\y1)} in (a) circle[radius=\n1] ;
\end{tikzpicture}
\end{center}


\begin{center}
\begin{tikzpicture}[]
\coordinate (a) at (0,0);
\coordinate (b) at (1.3,1.5);
% https://tex.stackexchange.com/a/58287
\draw 
  let
  \p1 = (a),
  \p2 = (b),
  \n1 = {veclen((\x2-\x1),(\y2-\y1))} in 
(a) circle[radius={\n1}];
\end{tikzpicture}
\end{center}

\end{document}

答案2

使用 tikzlibrarythrough可以轻松完成：

\node [draw] at (a) [circle through={(b)}] {};

在此处输入图片描述

\documentclass{article}
\usepackage{tikz}
\usetikzlibrary{through}
\begin{document}
\begin{tikzpicture}
\draw[help lines] (-2,-2) grid (2,2);
\node[circle,fill=red,inner sep=1pt] (a) at (0,0){a};
\node[circle,fill=red,inner sep=1pt] (b) at (1.3,1.5){b};

\node [draw,thick] at (a) [circle through={(b)}] {};
\end{tikzpicture}
\end{document}

相关内容