Nothing
# Converts Julian day of year (day of year, year)
# into a string date "DD.MM.YYYY". If year is missing a non-leap year
# is assumed.
jul2date1 <- function(d,y) {
if(missing(y)) y <- 2001
res <- .C("Cjul2date1",doy=as.integer(d),year=as.integer(y),date="DD.MM.YYYY")
return(res$date)
}
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.