Add grenander R code