Optimizing R code using vectorization

Published --