Fix typo in R script