v1<-numeric(length=4)
v3<-vector(mode= "numeric", length=4)
v1
v3

l1 <- list(c(1, 5, 7), "string", c(TRUE, FALSE))
l1
v <- numeric(6)
v<-c(1,2,3,4,5)
v2 <- numeric(6)
v2<-c(1,2,3,4,5,6);v2

dim(v2) <- c(2, 3); v2
dim(v2) <- c(3, 2); v2
v3