Re: Product with p!=j
- To: mathgroup at smc.vnet.net
- Subject: [mg21705] Re: [mg21683] Product with p!=j
- From: "Tomas Garza" <tgarza at mail.internet.com.mx>
- Date: Sat, 22 Jan 2000 02:53:19 -0500 (EST)
- Sender: owner-wri-mathgroup at wolfram.com
guillerm at gugu.usal.es wrote: > 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?. Perhaps this will help: In[1]:= d[p_, j_] := If[p != j, 1/(Subscript[k, p] - Subscript[k, j]), 1] In[2]:= q[n_] = Sum[Product[d[p, j], {p, 1, n}], {j, 1, n}] Tomas Garza Mexico City