editing
approved
editing
approved
Alois P. Heinz, <a href="/A022917/b022917.txt">Table of n, a(n) for n = 0..1000</a>
approved
editing
editing
approved
From Vaclav Kotesovec, Mar 15 2019: (Start)
Recurrence: (n+1)*(n+2)*(n+3)*(4*n^3 + 8*n^2 + 4*n - 1)*a(n) = 8*(2*n^2 + 2*n - 1)*(n^3 + 4*n^2 + 7*n + 3)*a(n-1) + 16*(n-1)*(4*n^4 + 16*n^3 + 16*n^2 + 18*n + 15)*a(n-2) + 128*(n-2)*(n-1)*(2*n^3 + 14*n^2 + 31*n + 18)*a(n-3) + 256*(n-3)*(n-2)*(n-1)*(4*n^3 + 20*n^2 + 32*n + 15)*a(n-4).
a(n) ~ 2^(2*n + 5/2) / (Pi*n)^(3/2). (End)
approved
editing
editing
approved
Table[n!/Times@@(Floor[Range[n, n+3]/4]!), {n, 0, 30}] (* Harvey P. Dale, May 30 2018 *)
approved
editing
editing
approved
A022917 := proc(n)
n!/floor(n/4)!/floor((n+1)/4)!/floor((n+2)/4)!/floor((n+3)/4)! ;
end proc: # R. J. Mathar, Aug 06 2015
Conjecture: -(126*n-1)*(n+3)*(n+2)*(n+1)*a(n) +4*(-208*n^4-51*n^3+793*n^2+376*n-6)*a(n-1) +16*(334*n^3-114*n^2-5*n-369)*a(n-2) +64*(n-2)*(334*n^2+264*n-213)*a(n-3) +768*(n-2)*(n-3)*(42*n^2+153*n+113)*a(n-4) +1024*(208*n+177)*(n-2)*(n-3)*(n-4)*a(n-5)=0. - R. J. Mathar, Aug 06 2015
approved
editing
proposed
approved