Nothing

```
cart2sph = function(cart) {
# Convert Cartesian coordinates to spherical (egg) coordinates
x = cart[1]
y = cart[2]
z = cart[3]
r = sqrt(x^2 + y^2 + z^2)
theta = atan2(y,x)
phi = abs(atan2(z, sqrt(x^2 + y^2)) - (pi/2))
return (c(r, theta, phi))
}
```

**Any scripts or data that you put into this service are public.**

Embedding an R snippet on your website

Add the following code to your website.

For more information on customizing the embed code, read Embedding Snippets.