# Re: [R] list operation

From: William Dunlap <wdunlap_at_tibco.com>
Date: Wed, 23 Jun 2010 14:13:04 -0700

```  > lst <- list(m=c('a','b','c'),n=c('c','a'),l=c('a','bc'))
> f <- function(list, set) vapply(lst, function(el)all(is.element(set, el)), FUN.VALUE=logical(1))
> # if you have an old version of R use as.logical(sapply(...))
> # instead of vapply(..., FUN.VALUE=logical(10)
> i <- f(lst, c("a","c"))
> i
m     n     l
```

TRUE TRUE FALSE
> names(lst)[i]
[1] "m" "n"
> lst[i]
\$m
[1] "a" "b" "c"

\$n
[1] "c" "a"

Bill Dunlap
Spotfire, TIBCO Software
wdunlap tibco.com

> -----Original Message-----
> From: r-help-bounces_at_r-project.org
> [mailto:r-help-bounces_at_r-project.org] On Behalf Of Yuan Jian
> Sent: Wednesday, June 23, 2010 6:35 AM
> To: r-help_at_r-project.org
> Subject: [R] list operation
>
> Hi,
>
> it seems a simple problem, but I can not find a clear way.
> I have a list:
> lst=list(m=c('a','b','c'),n=c('c','a'),l=c('a','bc'))
> > lst
> \$m
> [1] "a" "b" "c"
> \$n
> [1] "c" "a"
> \$l
> [1] "a"  "bc"
>
> how can I get list elements that include a given subset? for
> example, for given subset {'a','c'}, the answer should be 'm' and 'n'.
>
> thanks
> Yu
>
>
>
> [[alternative HTML version deleted]]
>
>

R-help_at_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. Received on Wed 23 Jun 2010 - 21:32:44 GMT

Archive maintained by Robert King, hosted by the discipline of statistics at the University of Newcastle, Australia.
Archive generated by hypermail 2.2.0, at Wed 23 Jun 2010 - 21:50:36 GMT.

Mailing list information is available at https://stat.ethz.ch/mailman/listinfo/r-help. Please read the posting guide before posting to the list.