%I M4777 #19 Aug 07 2017 03:19:05
%S 1,1,11,19,7861,301259,451526509,6427914623,16794274237,
%T 12896029408223,395798985324353,30839190064680907,
%U 164178854787337441961,104746805369703910637,30345665255129739404489
%N Numerators of coefficients of Green function for cubic lattice.
%D N. J. A. Sloane and Simon Plouffe, The Encyclopedia of Integer Sequences, Academic Press, 1995 (includes this sequence).
%H G. S. Joyce, <a href="https://doi.org/10.1098/rsta.1973.0018">On the simple cubic lattice Green function</a>, Phil. Trans. Roy. Soc., 273 (1972), 583-610.
%F Recurrence for the fraction A003284(n)/A003298(n) is the same as for A003299(n)/A003300(n). - _R. J. Mathar_, Dec 08 2005
%F 36*n*(n+1)*(2n+1)*a(n+1)/A003298(n+1)-4*n*(20*n^2+1)*a(n)/A003298(n)+(2*n-1)^3*a(n-1)/A003298(n-1)=0. - _R. J. Mathar_, Dec 08 2005
%p Dnminus1 := 1 : print(numer(Dnminus1)) ; Dn := 1/18 : print(numer(Dn)) ; for nplus1 from 2 to 20 do n := nplus1-1 : Dnplus1 := (4*n*(20*n^2+1)*Dn-(2*n-1)^3*Dnminus1)/(36*n*nplus1*(2*n+1)) : print(numer(Dnplus1)) ; Dnminus1 := Dn : Dn := Dnplus1 : od : # _R. J. Mathar_, Dec 08 2005
%Y Cf. A003298.
%K nonn,easy,frac
%O 0,3
%A _N. J. A. Sloane_
%E More terms from _R. J. Mathar_, Dec 08 2005
|