login
A089745
a(n) = direuler(p=2,n,1/(1-X)/(1-p*n*X))[n].
0
1, 5, 10, 73, 26, 247, 50, 4369, 757, 1071, 122, 22237, 170, 2871, 3496, 1082401, 290, 109927, 362, 165741, 9472, 10935, 530, 8244985, 15751, 17967, 538084, 629021, 842, 838201, 962, 1090785345, 36400, 39951, 43296, 61890661, 1370, 55671, 59944, 104214681
OFFSET
1,2
PROG
(PARI) for(n=1, 100, print1(direuler(p=2, n, 1/(1-X)/(1-p*n*X))[n], ", ")) \\ Vaclav Kotesovec, Jun 14 2020
CROSSREFS
Sequence in context: A056316 A156102 A120834 * A356820 A358491 A316305
KEYWORD
nonn
AUTHOR
Jon Perry, Jan 08 2004
EXTENSIONS
a(19) corrected and more terms from Vaclav Kotesovec, Jun 14 2020
STATUS
approved