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 EN UNA UNICA COLUMNA 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 imprimir cada elemento de una primera y segunda fila en un solo elemento de una nueva columna.
se necesita que se vea algo asi