chartsist bar chart

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

devtools::install_github("yutannihilation/chartist")

library(chartist)

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

By default, a line chart is drawn.

chartist(data, day)

Bar() draws a bar chart.

chartist(data, day) + Bar()

chartist(data, day) + Bar(stackBars = TRUE)

Note that currently there are no options for bar width. I should implement a feature to generate some javascript code like this:

.on('draw', function(data) {
  if(data.type === 'bar') {
    data.element.attr({
      style: 'stroke-width: 30px'
    });