Hola

lapply(miResul, function(x) lapply(x, ViernesLibre))

debería hacer lo que quieres. También es posible que merezca la pena
devolver los resultados de turnoLaboratorio en otra estructura, como un
data.frame.

Un saludo
Gregorio R. Serrano

El 27 de febrero de 2012 20:33, Ana Pérez V. <anapv78@yahoo.es> escribió:

>
> Hola a todos/as:
>
> Tengo la siguiente duda:
>
> Construyo una lista de tamaño 2, del siguiente modo:
>
> miLista<-list()
> miLista[[1]]<-list(nombre="Ana", apellido1="Pérez", apellido2="Sánchez")
> miLista[[2]]<-list(nombre="Carlos", apellido1="Núñez", apellido2="Sierra")
>
> Le aplico la función turnoLaboratorio:
>
> miResul<-lapply(miLista, turnoLaboratorio)
>
> Sobre el resultado (miResul) quiero aplicar la función booleana
> "ViernesLibre",
> pero resulta que para utilizar lapply tengo que indicar el índice del
> "sub-elemento" de la lista en el cual me encuentro. Por ejemplo, para el
> primer elemento:
>
> x = lapply(miResul[[1]], ViernesLibre)
>
> La pregunta es: ¿Hay alguna manera de hacer este apply en conjunto,
> sin tener que ir elemento a elemento?.
>
> Gracias de antemano. Y perdón por mi ignorancia!!
>
> Un saludo.
> Ana
>
>
>        [[alternative HTML version deleted]]
>
>
> _______________________________________________
> R-help-es mailing list
> R-help-es@r-project.org
> https://stat.ethz.ch/mailman/listinfo/r-help-es
>
>


-- 
Dr. Gregorio R. Serrano
Dpto. Economía Cuantitativa (UCM)
Voz:+34 91394 2361
Twitter: @grserrano_
http://www.grserrano.es

	[[alternative HTML version deleted]]

