Skip to main content
3 events
when toggle format what by license comment
Apr 24, 2023 at 10:31 history edited cvgmt CC BY-SA 4.0
added 61 characters in body
Apr 24, 2023 at 10:23 comment added csn899 ClearAll["`*"] p1 = {3, 5} p2 = {6, 7} p3 = {8, 9} Cir = CircleThrough[{p1, p2, p3}] RegionConvert[Cir, "Implicit"] sol = Solve[ r > 0 && (x - a)^2 + (y - b)^2 == r^2 /. Thread[{x, y} -> #] & /@ {p1, p2, p3}, {a, b, r}] (x - a)^2 + (y - b)^2 == r^2 /. sol
Apr 24, 2023 at 10:01 history answered cvgmt CC BY-SA 4.0