|
| |
|
|
A034971
|
|
floor[ E_(n+1)/E_(n) ] where E_n is n-th Euler number (see A028296 and A000364).
|
|
3
| |
|
|
5, 12, 22, 36, 53, 73, 97, 124, 154, 187, 223, 263, 306, 352, 402, 454, 510, 569, 632, 697, 766, 838, 914, 992, 1074, 1159, 1248, 1339, 1434, 1532, 1634, 1738, 1846, 1957, 2071, 2189, 2310, 2434, 2561, 2691, 2825, 2962, 3102, 3246, 3393, 3542, 3696, 3852
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
COMMENTS
| First nine terms are identical to those of A025740.
|
|
|
REFERENCES
| Peters J. and Stein J. - Mathematische Tafeln . Revised Russian Edition in 1968, Moscow, Table 9b.
|
|
|
FORMULA
| a(n)=[ E(n+1)/E(n) ] where E(n) is n-th coefficient in expansion of sec(x).
|
|
|
MATHEMATICA
| Wolfram: ae[ x_ ] := Abs[ EulerE[ 2*x ] ] and fo[ x_ ] := Floor[ N[ ae[ x ]/ae[ x-1 ], 80 ] ]
Table[Floor[Abs[EulerE[2n+2]]/Abs[EulerE[2n]]], {n, 60}] (* From Harvey P. Dale, May 01 2011 *)
|
|
|
CROSSREFS
| Cf. A028296, A000364, A025740.
Sequence in context: A025734 A153818 A069627 * A025740 A054307 A172295
Adjacent sequences: A034968 A034969 A034970 * A034972 A034973 A034974
|
|
|
KEYWORD
| nonn,easy
|
|
|
AUTHOR
| Labos E. (labos(AT)ana.sote.hu)
|
| |
|
|