Services & ResourcesWolfram ForumsMathGroup Archive

[Date Index] [Thread Index] [Author Index]

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>