Aliases: mjs_bar
Keywords:
### ** Examples data.frame(year=seq(1790, 1970, 10), uspop=as.numeric(uspop)) %>% mjs_plot(x=year, y=uspop, width=300, height=400) %>% mjs_bar()
Warning in widget_html(name = class(x)[1], package = attr(x, "package"), : metricsgraphics_html returned an object of class `list` instead of a `shiny.tag`.
Error in loadNamespace(name): there is no package called 'webshot'