Create langplot.R