typo .R file