R code for describing the fortify() method