An exaple from Reproducible Research with R and R studio