A vector containing repeated elements of the first 6 even numbers 0 0 0 0 2 2 2 2 4 4 4 4 6 6 6 6 8 8 8 8 10 10 10 10

even<-seq(0,10,2) vec1<-sample(c(even),size = 24,replace = TRUE,prob=NULL)

output should be 0 0 0 0 2 2 2 2 4 4 4 4 6 6 6 6 8 8 8 8 10 10 10 10