R Vignette edited for structure and R code