Description Usage Arguments Value References Examples
Soddy finds inner and outer Soddy circles of three given mutually tangent circles
| 1 | 
| A | Vector containing the xy-coordinates of the center of circumference 1 | 
| r1 | Radius for circumference 1 | 
| B | Vector containing the xy-coordinates of the center of circumference 2 | 
| r2 | Radius for circumference 2 | 
| C | Vector containing the xy-coordinates of the center of circumference 3 | 
| r3 | Radius for circumference 3 | 
A list which contains the Soddy center and the radiuses of Soddy inner and outer circle of three mutually tangent circles
http://mathworld.wolfram.com/SoddyCircles.html
| 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 | x_min <- -3
x_max <- 3
y_min <- -2.5
y_max <- 3.5
CoordinatePlane(x_min, x_max, y_min, y_max)
A <- c(-1,0)
B <- c(1,0)
C <- c(0,sqrt(3))
r1 <- 1
r2 <- 1
r3 <- 1
Draw(CreateArcAngles(A, r1, 0, 360), "black")
Draw(CreateArcAngles(B, r2, 0, 360), "black")
Draw(CreateArcAngles(C, r3, 0, 360), "black")
result <- Soddy(A, r1, B, r2, C, r3)
soddy_point <- result[[1]]
inner_radius <- result[[2]]
outer_radius <- result[[3]]
Draw(soddy_point,"red")
Draw(CreateArcAngles(soddy_point,inner_radius,0,360),"red")
Draw(CreateArcAngles(soddy_point,outer_radius,0,360),"red")
 | 
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.