x= c(7,8,9,10,11,12)
x= seq(7,12,1)
x= 7:12
y= 2*x
x 
y
z=cbind(x,y) # combinar los vectores x e y por columnas 
colnames(z)=c("c1","c2")
z 
# invertir el orden de las filas de z 
z[c(6,5,4,3,2,1),]
z[6:1,]