Re: Product with p!=j

• To: mathgroup at smc.vnet.net
• Subject: [mg21691] Re: [mg21683] Product with p!=j
• From: BobHanlon at aol.com
• Date: Sat, 22 Jan 2000 02:52:51 -0500 (EST)
• Sender: owner-wri-mathgroup at wolfram.com

Break the product into two separate products.

q[n_] := Sum[
1/(Product[Subscript[k, p] - Subscript[k, j], {p, 1, j - 1}] *
Product[Subscript[k, p] - Subscript[k, j], {p, j + 1, n}]), {j, 1,
n}]

q[3]

1/((Subscript[k, 2] - Subscript[k, 1])*(Subscript[k, 3] -
Subscript[k, 1])) +
1/((Subscript[k, 1] - Subscript[k, 2])*
(Subscript[k, 3] - Subscript[k, 2])) +
1/((Subscript[k, 1] - Subscript[k, 3])*
(Subscript[k, 2] - Subscript[k, 3]))

Bob Hanlon

In a message dated 1/21/2000 5:17:53 AM, guillerm at gugu.usal.es writes:

>I have the following problem:
>
>q[n_]:= Sum[1/Product[Subscript[k, p] - Subscript[k, j], {p, 1, n}], {j,
>1, n}], with p!=j
>
>Any suggestions?.
>

• Prev by Date: Integral of x/(1+x^4) problem (in Mathematica30)
• Next by Date: Intersection of 2 subspaces
• Previous by thread: Re: Product with p!=j
• Next by thread: Re: Product with p!=j