Hi,
May be this helps:
x<- list(1:5,NA,20:25,5)
names(x)<-1:4
fun1<-function(lst){
lst[lapply(lapply(lst,Filter,f=Negate(is.na)),length)!=0]}
fun1(x)
#$`1`
#[1] 1 2 3 4 5
#
#$`3`
#[1] 20 21 22 23 24 25
#
#$`4`
#[1] 5
#or
x[lapply(lapply(x,na.omit),length)!=0]
A.K.
----- Original Message -----
From: Benjamin Ward (ENV) <b.w...@uea.ac.uk>
To: "r-help@r-project.org" <r-help@r-project.org>
Cc:
Sent: Monday, January 28, 2013 9:21 PM
Subject: [R] NA and Character(0) in List Element
Hi, This is probably a small query but one I'm struggling with: I have a list
in which I had elements which were NA, I removed them, by doing: list2 <-
lapply(list, na.omit),
However this leaves the element there with 'character(0)' in place as well as
attributes:
e.g.
[[978]]
character(0)
attr(,"na.action")
[1] 1
attr(,"class")
[1] "omit"
I want to get rid of these elements/positions in the list, since a function is
supposed to sample the list for elements (each element is a collection of about
20 numbers each).
Thanks,
Ben W.
UEA (ENV) - b.w...@uea.ac.uk
[[alternative HTML version deleted]]
______________________________________________
R-help@r-project.org mailing list
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
and provide commented, minimal, self-contained, reproducible code.
______________________________________________
R-help@r-project.org mailing list
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
and provide commented, minimal, self-contained, reproducible code.
