OFFSET
0,3
LINKS
Vaclav Kotesovec, Table of n, a(n) for n = 0..230
FORMULA
a(n) ~ c * d^n / n^2, where d = 38.7729855097144987072847461256815071909..., c = 0.0318193213988281353709268311928... .
MAPLE
T:=proc(n, k) option remember; `if`(n=0 or k=1, 1, T(n, k-1) + `if`(n<k, 0, T(n-k, k))) end proc: seq(T(5*n^2, n), n=0..20);
MATHEMATICA
(* A program to compute the constant d = 38.7729855... *) With[{j=5}, r^(2*j+1)/(r-1) /.FindRoot[-PolyLog[2, 1-r] == (j+1/2)*Log[r]^2, {r, E}, WorkingPrecision->100]] (* Vaclav Kotesovec, Jun 10 2015 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Vaclav Kotesovec, May 25 2015
STATUS
approved