Update charts.R