add sc.r
Merge branch 'master' of github.com:kouamano/R_SCRIPT