Nothing
#!/usr/bin/Rscript
Sys.setenv(TZ="America/Chicago")
options(digits.secs=6)
library(RApiDatetime)
x <- format(as.POSIXct(Sys.time() + 0:1, origin="1970-01-01"))
str(x)
X <- rapistrptime(x, "%Y-%m-%d %H:%M:%OS", "")
str(X)
str(rapiAsPOSIXct(X))
str(rapiAsPOSIXlt(rapiAsPOSIXct(X)))
str(rapiPOSIXlt2D(X))
str(rapiD2POSIXlt(rapiPOSIXlt2D(X)))
str(rapiFormatPOSIXlt(X, "%Y-%b-%d %H:%M:%OS"))
str(rapiFormatPOSIXlt(X, "%Y-%b-%d %H:%M:%OS", TRUE))
str(asDatePOSIXct(.POSIXct(1540181413, "America/Chicago")))
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.