powered by
Internal Function for Use in Package for Calculating Sum of Squares of a Vector
sumsq(x)
Numeric vector to be evaluated
The sum of squares of the vector
Internal function for package
# NOT RUN { vec <- sample(c(100:120), 50, replace = TRUE) sumsq(vec) # }
Run the code above in your browser using DataLab