ChartJS - Test barchart

chartjs-barchart.Rmd

---
title: "Flex Dashboard"
output: 
  flexdashboard::flex_dashboard:
    orientation: columns
    vertical_layout: fill
    horizontal_layout: fill
---

<!-- Learn more about flexdashboard at https://rstudio.github.io/flexdashboard -->


```{r setup, include=FALSE}
# Load packages and initialize data here
library(flexdashboard)
library(chartjs)
```

Bars Chart
=======================================

```{r}
chartjs() %>%
  cjsBar(labels = LETTERS[1:10]) %>%
  cjsAddSeries(data = c(abs(c(rnorm(8))), NA, 0.5), label = "Series 1") %>%
  cjsAddSeries(data = abs(c(rnorm(10))), label = "Series 2") %>%
  cjsAddSeries(data = abs(c(rnorm(10))), label = "Series 3") %>% 
  cjsLegend()
```