Added System Time
In order to see when the document was created, we add the system time.
This commit is contained in:
@@ -11,6 +11,10 @@ colnames(df) <- c("date", "name", "topic", "humidity", "temperature", "presure",
|
|||||||
df$date <- as.POSIXct(df$date)
|
df$date <- as.POSIXct(df$date)
|
||||||
```
|
```
|
||||||
|
|
||||||
|
```{r echo=FALSE}
|
||||||
|
Sys.time()
|
||||||
|
```
|
||||||
|
|
||||||
## Humidity
|
## Humidity
|
||||||
```{r}
|
```{r}
|
||||||
p_humidity <- ggplot(df, aes(x=date, y=humidity, group=name, color=name)) + geom_line()
|
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)),]
|
most_recent <- most_recent[order(rev(most_recent$date)),]
|
||||||
|
|
||||||
knitr::kable(most_recent, row.names = F)
|
knitr::kable(most_recent, row.names = F)
|
||||||
```
|
```
|
||||||
Reference in New Issue
Block a user