R: add cbind, [[]]