CircularArcThrough doesn't behave as expected in V14.2

Questions
,
1

Good evening.

If possible, test this code because I think it must be a bug in Mathematica 14.2

An arc should appear passing through the 3 points, unfortunately it does not.

Points = {{5.414348392917727`,

4.531478714334182`}, {5.924633505667235`,

4.253796347146444`}, {6.48013829974836`, 4.423834040301968`}};

CircularArcThrough[Points]; Graphics[{%, Red, Point@Points}, Axes -> True,

AxesOrigin -> {0, 0},

PlotRange -> {{0, 7}, {0, 6}}]

CircularArcThrough.nb (3.68 KB)

2

Yes it’s a Bug. CircularArcThrough give wrong values circular or ellipse arc from angle Theta1 to Theta2 in Circle command.

Open in Wolfram Cloud ↗

Regards M.I

3

Center and radius are correct, but the angles are wrong. Here is one more example:

pts = {{Sqrt[2], 0}, {1, -1}, {0, - Sqrt[2]}};
CircularArcThrough[pts]
Graphics[{CircularArcThrough[pts], PointSize[Large], Point[pts]}, 
 Frame -> True]