scripts of R language