Saludos querida comunidad Estoy trabajando con una lista a la que he nombrado test1. Cada elemento de dicha lista es un data frame con la siguiente estrucutura
> str(test1[[1]])
'data.frame': 31861 obs. of 3 variables:
$ codigo_estacion: num 86011 86011 86011 86011 86011 ...
$ fecha_hora : chr "2019-02-28 16:00:00" "2019-02-28 16:10:00" "2019-02-28 16:20:00" "2019-02-28 16:30:00" ...
$ precipitacion : num 0 0 0 0 0 0 0 0 0 0 ...
No todos los dataframes de la lista tienen la misma cantidad de filas, pero todos ellos si tienen exactamente los mismos campos y mismo tipo de datos en cada uno de ellos. Mi propósito es crear un nuevo vector que contenga el codigo de estación de cada dataframe de la lista.
nomb <- character(0)
for(i in length(test1)) {
nomb[i] = test1[[i]][1,1]
}
Pero por algún motivo, que claramente estoy pasando por alto, obtengo lo siguiente:
> nomb
[1] NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA
[17] NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA
[33] NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA
[49] NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA
[65] NA NA NA NA NA NA NA "86299"
Como pueden ver solamente el último elemento del vector que he creado guarda el codigo de estación. Es algo que ya había hecho en el pasado con otros datos y funcionaba perfectamente bien.
Luego por ejemplo si pruebo lo siguiente:
> nomb[1] = test1[[1]][1, 1]
> nomb[3] = test1[[3]][1, 1]
> nomb
[1] "86011" NA "86027" NA NA NA NA NA NA NA NA NA NA NA NA NA
[17] NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA
[33] NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA
[49] NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA NA
[65] NA NA NA NA NA NA NA "86299"
Logro agregar el codigo de estacion a los elementos uno y dos del vector nomb, es decir al hacer el proceso individualmente si funciona. Lo que me dice que mi error esta al escribir el ciclo for, pero no estoy pudiendo descifrarlo.