library(magrittr)
library(opensensmapr)
if (is.null(as.list(environment())$osem_counts_ts))
osem_counts_ts = data.frame()
osem_counts_ts = osem_counts() %>%
list(time = Sys.time()) %>%
as.data.frame() %>%
rbind(osem_counts_ts)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.