rCharts testing