A004150 Euler numbers written backwards.
1, 1, 1, 2, 5, 61, 16, 272, 5831, 6397, 12505, 297353, 5672072, 65286322, 189063991, 2137573091, 54121519391, 679243568902, 1445769784042, 23821158888092, 525732881173073, 6904213508941594, 10973139347884396, 2532586056883245101, 50968075536143541551
Offset: 0
Programs
-
Mathematica
IntegerReverse/@With[{nn=30},CoefficientList[Series[(1+Sin[x])/Cos[x],{x,0,nn}],x]*Table[k!,{k,0,nn}]] (* Harvey P. Dale, May 25 2023 *)
Formula
Extensions
More terms from Eric M. Schmidt, Apr 04 2014