library(taucharts) knitr::opts_chunk$set(echo = FALSE) testdata <- data.frame(date = seq(as.Date("2016-02-29") - 300, Sys.Date(), by = "day"), val = rnorm(43))
tauchart(testdata) %>% tau_line("date", "val") %>% tau_guide_x(tick_format = "%b-%y")
tauchart(testdata) %>% tau_line("date", "val") %>% tau_guide_x(tick_format = "%b-%y")
tauchart(testdata) %>% tau_line("date", "val") %>% tau_guide_x(tick_format = "%b-%y")
tauchart(testdata) %>% tau_line("date", "val") %>% tau_guide_x(tick_format = "%b-%y")
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.