se muestra una imagen de base de datos en formato csv

[![introducir la descripción de la imagen aquí][1]][1]

datos_consumo<-read.csv("Consumo.csv")

da_consumo<-as_tibble(datos_consumo) %>% 
  clean_names()

da_consumo1<-da_consumo %>%
select(consumo,consumo_1,consumo_2,consumo_3,consumo_4,consumo_5,consumo_6,consumo_7,consumo_8,consumo_9,consumo_10)


PARA COMBINAR LAS FILAS DE CONSUMO EN UNA ÚNICA COLUMNA DE CONSUMO

df1<-data.frame(x=da_consumo1$consumo)

df2<-data.frame(x=da_consumo1$consumo_1)


consumo<-rbind(df1,df2) #se imprimó mal la única columna porque no se podria combinar cada elemento de una primera y segunda  fila en un solo elemento de una nueva columna. 

se necesita que se vea algo asi

[![introducir la descripción de la imagen aquí][2]][2]


  [1]: https://i.sstatic.net/iVbCyZrj.png
  [2]: https://i.sstatic.net/cwrJMlNg.png