Line plot of chartist

devtools::install_github("yutannihilation/chartist@line")

library(chartist)

set.seed(324)
data <- data.frame(
  day = paste0("day", 1:20),
  A   = runif(20, 0, 10),
  B   = runif(20, 0, 10),
  C   = runif(20, 0, 10),
  D   = runif(20, 0, 10)
)

Basic Chart

chartist(data, day)

Add Options

chartist(data, day) + Line(showArea = TRUE, showPoint = FALSE)

chartist(data, day) + Point()