########## EXAMPLE 1 ##########
X <- 10
sumsq(X)
########## EXAMPLE 2 ##########
X <- 1:10
sumsq(X)
########## EXAMPLE 3 ##########
X <- matrix(1:10,5,2)
sumsq(X)
########## EXAMPLE 4 ##########
X <- array(matrix(1:10,5,2),dim=c(5,2,2))
sumsq(X)
########## EXAMPLE 5 ##########
X <- vector("list",5)
for(k in 1:5){ X[[k]] <- matrix(1:10,5,2) }
sumsq(X)
Run the code above in your browser using DataLab