diff --git a/data_analysis/report.Rmd b/data_analysis/report.Rmd index 2bbf751..2cd52d7 100644 --- a/data_analysis/report.Rmd +++ b/data_analysis/report.Rmd @@ -11,6 +11,10 @@ colnames(df) <- c("date", "name", "topic", "humidity", "temperature", "presure", df$date <- as.POSIXct(df$date) ``` +```{r echo=FALSE} +Sys.time() +``` + ## Humidity ```{r} p_humidity <- ggplot(df, aes(x=date, y=humidity, group=name, color=name)) + geom_line() @@ -30,4 +34,4 @@ most_recent <- tail(df, n=30) most_recent <- most_recent[order(rev(most_recent$date)),] knitr::kable(most_recent, row.names = F) -``` +``` \ No newline at end of file