Created Shiny codes
Created code for rCharts