A020525 a(n) = 5th Euler polynomial evaluated at 2^n and multiplied by 2.
1, 3, 847, 45375, 1770751, 61871103, 2063618047, 67377381375, 2177548746751, 70025148104703, 2246302260789247, 71969633128677375, 2304435634414026751, 73764458297036898303, 2360822953465975144447, 75552099118396657893375
Offset: 0
Links
- Colin Barker, Table of n, a(n) for n = 0..664
- Index entries for linear recurrences with constant coefficients, signature (53,-756,2752,-2048).
Programs
-
Maple
seq(euler(5,2**i),i=0..24);
-
Mathematica
Table[EulerE[5,2^n],{n,0,40}]*2 (* Vladimir Joseph Stephan Orlovsky, Nov 03 2009 *) -
PARI
Vec((1444*x^2-50*x+1)/((x-1)*(4*x-1)*(16*x-1)*(32*x-1)) + O(x^100)) \\ Colin Barker, May 04 2015
Formula
a(n) = 53*a(n-1)-756*a(n-2)+2752*a(n-3)-2048*a(n-4) for n>3. - Colin Barker, May 04 2015
G.f.: (1444*x^2-50*x+1) / ((x-1)*(4*x-1)*(16*x-1)*(32*x-1)). - Colin Barker, May 04 2015