comments on R-script