powered by
x
simpvector(x)
n
sca
x0 <- c(-2:3, 3:-1,0:3,1,1) cbind(x0, simpvector(x0)) # entries (-11, 0, 3)
Run the code above in your browser using DataLab