Add R code and plot of Combined language counts