Nothing
Lll2xyz<-function(lat, lon)
{
### lat here is lattitude (not co-lat)
DEGRAD = pi/180
z = sin(DEGRAD*lat);
y = cos(DEGRAD*lat)*sin(DEGRAD*lon);
x = cos(DEGRAD*lat)*cos(DEGRAD*lon);
return(list(x=x,y=y,z=z))
}
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.