Rename R to R/average_chart.R