|
%I #10 Mar 19 2017 00:21:00
%S 1,1,1,0,1,1,-1,0,1,1,0,-1,0,9,1,1,0,-5,0,9,1,0,1,0,-1,0,25,1,-5,0,7,
%T 0,-35,0,25,1,0,-1,0,7,0,-25,0,1225,1,7,0,-15,0,27,0,-525,0,1225,1,0,
%U 7,0,-27,0,189,0,-245,0,3969,1,-21,0,11,0,-297,0,77,0,-1617,0,3969,1,0,-3,0,77,0,-55
%N Triangle of numerators of Integrate[LegendreP[m,x]LegendreP[n,x],{x,0,1}].
%H Eric Weisstein's World of Mathematics, <a href="http://mathworld.wolfram.com/LegendrePolynomial.html">Legendre Polynomial</a>
%o (PARI) T(m,n)=numerator(subst(intformal(pollegendre(m)*pollegendre(n)),'x,1))
%o for(n=0,9,for(m=0,n, print1(T(m,n)", "))) \\ _Charles R Greathouse IV_, Mar 19 2017
%Y Cf. A078298.
%K sign,tabl,frac
%O 0,14
%A _Eric W. Weisstein_, Nov 21 2002
|
