knitr::opts_chunk$set(echo = FALSE, cache = TRUE, fig.align = "center") library(senseBox) library(tidyverse) theme_update(axis.text = element_text(size = 14), axis.title = element_text(size = 14, face = "bold"), legend.text = element_text(size = 12), legend.title = element_text(size = 12, face = "bold"))
data <- search_senseBox()
table <- data %>% filter(is.na(lastMeasurementAt)) %>% select(senseBoxId, name, lastMeasurementAt)
knitr::kable( table, format = "html" )
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.