Chartist.js for R, powered by htmlwidgets. Github repo is here: https://github.com/yutannihilation/chartist

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

test.

chartist(data, day) + SVG_animate(target = "point", style = "x1", from = -100, to = 0)