add the extracted R code via purl