Services & Resources / Wolfram Forums
-----
 /
MathGroup Archive
2001
*January
*February
*March
*April
*May
*June
*July
*August
*September
*October
*November
*December
*Archive Index
*Ask about this page
*Print this page
*Give us feedback
*Sign up for the Wolfram Insider

MathGroup Archive 2001

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

Search the Archive

Re: clever way to do a product?

  • To: mathgroup at smc.vnet.net
  • Subject: [mg27169] Re: [mg27164] clever way to do a product?
  • From: BobHanlon at aol.com
  • Date: Fri, 9 Feb 2001 03:10:17 -0500 (EST)
  • Sender: owner-wri-mathgroup at wolfram.com

n = 5;  j = 3;

Product[1/(x[i]-x[j]), {i, j-1}]*Product[1/(x[i]-x[j]), {i, j+1,  n}] == 

  Product[If[i == j, 1, 1/(x[i]-x[j])], {i, n}] ==  

  Product[1/(x[i]-x[j] + KroneckerDelta[i,  j]), {i, n}]

True

Bob Hanlon

In a message dated 2001/2/8 4:47:52 AM, drearyslig at hotmail.com writes:

>Does anyone know of a clever way where I can calculate a product, where
>i
>runs from 1 to n, except where i=j?


  • Prev by Date: Re: clever way to do a product?
  • Next by Date: Re: clever way to do a product?
  • Previous by thread: Re: clever way to do a product?
  • Next by thread: Re: clever way to do a product?