Location via proxy:   [ UP ]  
[Report a bug]   [Manage cookies]                
A011189
Coefficients in expansion of e as Sum_{n>=1} a(n)/(n*n!*(n+1)!), as found by greedy algorithm.
2
5, 5, 4, 7, 35, 12, 38, 70, 10, 82, 92, 118, 94, 121, 133, 184, 98, 306, 7, 420, 218, 248, 543, 182, 383, 444, 278, 627, 756, 359, 427, 588, 202, 884, 826, 1065, 355, 840, 284, 1153, 921, 1730, 1929, 1487, 901, 919, 2169, 473, 2193, 1908, 144, 2655, 630, 1957
OFFSET
1,1
MATHEMATICA
seq[cons_, len_] := Module[{s = {}, n = 0, c = cons, m}, While[n < len, n++; m = Floor[c*(n*n!*(n + 1)!)]; AppendTo[s, m]; c -= m/(n*n!*(n + 1)!)]; s]; seq[E, 50] (* Amiram Eldar, Mar 11 2022 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
EXTENSIONS
Offset corrected and more terms from Sean A. Irvine, Jun 14 2018
STATUS
approved