added comment on R file