Nothing
slope = function(cgrad,degrees=FALSE){
if (nargs() < 1) {
cat("USAGE: slope(cellgradient, degrees=FALSE) \n")
return()
}
slope = acos(cgrad[,,3])
if (degrees) slope = degrees(slope)
return(slope)
}
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.