Sum of Products

*To*: mathgroup at smc.vnet.net*Subject*: [mg126661] Sum of Products*From*: "Harvey P. Dale" <hpd1 at nyu.edu>*Date*: Tue, 29 May 2012 05:48:34 -0400 (EDT)*Delivered-to*: l-mathgroup@mail-archive0.wolfram.com

If I have a list and want to sum the products of each possible grouping of two elements in the list, this program will do that: Total[Times @@@ Subsets[{a, b, c}, {2}]] Is there any other, shorter, built-in Mathematica object that will produce the same result? Thanks. Harvey

**Follow-Ups**:**Re: Sum of Products***From:*Bob Hanlon <hanlonr357@gmail.com>