canopyReliefRatio<-function(Z){ zmin<-min(Z) return((mean(Z)-zmin)/(max(Z)-zmin)) }
Add the following code to your website.
REMOVE THIS Copy to clipboard
For more information on customizing the embed code, read Embedding Snippets.