Nothing
dirName <- "m:/work_3/REddyProcRelease/Level3"
siteName <- "_DEGeb_"
dsAllYears <- fLoadEuroFlux16(siteName, dirName)
#ds$R_pot <- NULL
dsAllYears$qf_NEE_st <- NULL
DEGebExample <- dsAllYears[ (as.POSIXlt(dsAllYears$DateTime-15L*60L)$year+1900) %in% 2004:2006,]
plot( NEE ~ DateTime, DEGebExample )
save(DEGebExample,file="data/DEGebExample.RData")
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.