Nothing
date2doy <-
function(date) {
#Calculates the Julian Day out of the integer date (YYMMDD)
tmp <- 0
doy <- .C("dateToDoy", as.integer(date), doy=as.integer(tmp), PACKAGE="phenex")$doy
return(doy)
}
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.