Nothing
## ----setup, include=FALSE, message=FALSE, results='hide'-----------------
knitr::opts_chunk$set(echo = TRUE)
knitr::opts_chunk$set(message = FALSE)
# knitr::opts_chunk$set(results = 'hide')
## ---- echo = F, out.width = "690px"--------------------------------------
knitr::include_graphics("comparison_simtimer_vs_regular_time.jpg")
## ------------------------------------------------------------------------
library(simtimer)
origin_date <- as.POSIXct("2017-01-01 00:00:00", tz = "UTC")
my_datetime <- c(as.POSIXct("2017-01-01 02:00:00", tz = "UTC"),
as.POSIXct("2017-02-27 20:53:20", tz = "UTC"),
as.POSIXct("2017-08-20 11:33:20", tz = "UTC"),
as.POSIXct("2018-01-06 08:53:20", tz = "UTC"))
my_sim_datetime <- as.sim_datetime(my_datetime, origin_date)
my_sim_datetime
class(my_sim_datetime)
## ------------------------------------------------------------------------
as.datetime(my_sim_datetime, origin_date)
## ------------------------------------------------------------------------
sim_time(my_sim_datetime)
## ------------------------------------------------------------------------
sim_wday(my_sim_datetime, origin_date)
## ------------------------------------------------------------------------
sim_date(my_sim_datetime)
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.