Nothing
time_vec = function(timeDF){
if(! is(timeDF, "timeDF")){
stop("timeDF argument needs to be timeDF class object")
}
time_var = time_var(timeDF)
return(timeDF[[time_var]])
}
time_var = function(timeDF){
if(! is(timeDF, "timeDF")){
stop("timeDF argument needs to be timeDF class object")
}
return(attr(timeDF, "time_var"))
}
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.