Is there a more efficient way of extracting particular columns and concatenating them in R?

Question

I am looking for a more efficient way of extracting particular columns from r and concatenating them.

I have tried the following:

r <-