MathGroup Archive 2011

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

Search the Archive

Re: How to create such a list

  • To: mathgroup at smc.vnet.net
  • Subject: [mg118488] Re: How to create such a list
  • From: Bob Hanlon <hanlonr at cox.net>
  • Date: Fri, 29 Apr 2011 07:34:32 -0400 (EDT)

n = 3;

list = Array[w, n];

Total /@ Subsets[list]

{0, w[1], w[2], w[3], w[1] + w[2], w[1] + w[3], w[2] + w[3], 
 w[1] + w[2] + w[3]}


Bob Hanlon

---- Dominic Woerner <dominic.woerner at mpi-hd.mpg.de> wrote: 

=============
Hi,

I like to create a list of the form:
0,w[1],...,w[n],w[1]+w[2],...,w[1]+w[n],w[2]+w[3],......,w[1]+...+w[n]
for arbitrary n
Is there a neat way to do this?

Cheers,
Dominic



  • Prev by Date: Mathematica 8 Free-Form linguistic input
  • Next by Date: HoldAll/HoldRest // updated
  • Previous by thread: Re: How to create such a list
  • Next by thread: Re: How to create such a list