minor change in R file