¿Cómo seleccionar directamente la misma columna de todas las listas anidadas dentro de una lista?

¿Es posible seleccionar directamente una columna de todas las listas anidadas dentro de una lista?
Mi lista se crea utilizando agregados () con tabla ():

AgN=aggregate(data,by=list(d$date),FUN=table,useNA="no")

AgN$x parece:

¿Es posible seleccionar directamente una columna de todas las listas anidadas dentro de una lista?
Mi lista se crea utilizando agregados () con tabla ():

AgN=aggregate(data,by=list(d$date),FUN=table,useNA="no")

AgN$x parece:

0` 1 2 3 9 11 0.447204969 0.438509317 0.096894410 0.009937888 0.007453416

¿Es posible seleccionar directamente una columna de todas las listas anidadas dentro de una lista?
Mi lista se crea utilizando agregados () con tabla ():

AgN=aggregate(data,by=list(d$date),FUN=table,useNA="no")

AgN$x parece:

1` 1 2 4 8 11 0.489974937 0.389724311 0.102756892 0.006265664 0.011278195 … $n

Quiero obtener un vector de una columna específica de cada tabla, por ej. un vector que contiene los valores de todas las columnas llamadas "1". Todavía soy un principiante de R, pero incluso después de buscar e intentar durante mucho tiempo no encontré una buena solución. Si quiero obtener el campo de una lista, simplemente puedo indexarlo entre paréntesis, por ejemplo. [i, j].
En línea encontré algunos ejemplos para matrices, así que intenté hacer lo mismo, al principio solo seleccioné una columna de lista anidada conAgN$x[1][1], pero eso sigue seleccionando una lista completa:

$0

     1           2           3           8          11 

0,447204969 0,438509317 0,096894410 0,009937888 0,007453416

Mi siguiente intento fueAgN$x[[1]][1], y estaba funcionando:

  1 

0.447205

Así que intenté hacer lo mismo para seleccionar el valor de cada primera columna de todas las listas anidadas:

AgN$x[[1:length(AgN$x]][1]
Recursive indexing failed at level 2

Aparentemente, el problema es que está prohibido seleccionar un rango si utiliza un paréntesis doble.

Mi último intento fue usar un bucle for:

cduR=NULL 
for (i in 1:length(AgN$x)){
t=AgN$x[[i]]
cduR=c(cduR,as.vector(t["1"]))
}

Finalmente, hasta ahora eso parece funcionar. Pero de esa manera tuve que construir un bucle cada vez que quisiera seleccionar columnas. ¿No hay forma directa?

Gracias por tu ayuda.

Respuestas a la pregunta(2)

Su respuesta a la pregunta