Re: Find common elements in a list of sublists

*To*: mathgroup at smc.vnet.net*Subject*: [mg125832] Re: Find common elements in a list of sublists*From*: Bob Hanlon <hanlonr357 at gmail.com>*Date*: Wed, 4 Apr 2012 04:32:29 -0400 (EDT)*Delivered-to*: l-mathgroup@mail-archive0.wolfram.com*References*: <201204030844.EAA16987@smc.vnet.net>

d = {{1, 19}, {1, 23}, {1, 5, 25}, {1, 17}, {1, 11}, {1, 5}}; Apply ( @@ ) Intersection to outer List Intersection @@ d {1} Bob Hanlon On Tue, Apr 3, 2012 at 4:44 AM, Cisco Lane <travlorf at yahoo.com> wrote: > Suppose I have a list of sublists: > > d={{1, 19}, {1, 23}, {1, 5, 25}, {1, 17}, {1, 11}, {1, 5}} > > How do I find the elements common to all the sublists? > > I can do it using intersection: > > Intersection[dx[[1]], dx[[2]], dx[[3]], dx[[4]], dx[[5]], dx[[6]]] > > which yields, correctly, {1}, but what if the number of sublists in d is variable? >

**References**:**Find common elements in a list of sublists***From:*Cisco Lane <travlorf@yahoo.com>