Substitute values in functions!!!

*To*: mathgroup at smc.vnet.net*Subject*: [mg52241] Substitute values in functions!!!*From*: davidx at x-mail.net (david Lebonvieux)*Date*: Wed, 17 Nov 2004 02:20:09 -0500 (EST)*Sender*: owner-wri-mathgroup at wolfram.com

Hallo! How can substitute some values(the zeros of BesselJ function) in this Integrals? j0[n_] := x /. FindRoot[BesselJ[0, x] == 0, {x, n 2.5}] \!\(s\_l = Array[j0, \ 10]\) Integrate[BesselJ[0,s0*r/R] BesselJ[0,s2*r/R]BesselJ[0,s3*r/R],{r,0,R}] where s0, s1,s2,the Zero-Poles of BesselJ.