R programming basics

Question

I've written the below code, I was wondering if there is a simpler implementation for this

value = c(0,1,0,0,0,0,1,0,1,0,0,0,0,1,0,1,0,0)
first = matrix(value, nrow=6)
second = matrix(rev(first),nrow=6) #reverse vector "value"
output10 = cbind(first,second)
output10    

Answer 1

There's a small change you can make, you can directly create the result matrix after the concatenation:

value <- c(0,1,0,0,0,0,1,0,1,0,0,0,0,1,0,1,0,0)
output10 <- matrix(c(value, rev(value)), nrow=6)