A011189 Coefficients in expansion of e as Sum_{n>=1} a(n)/(n*n!*(n+1)!), as found by greedy algorithm.

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

Links

Table of n, a(n) for n=1..54.

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

Cf. A001113, A011191, A011193.

Sequence in context: A180138 A094245 A117191 * A261346 A011409 A255240

Adjacent sequences: A011186 A011187 A011188 * A011190 A011191 A011192

Keyword

nonn

Author

N. J. A. Sloane.

Extensions

Offset corrected and more terms from Sean A. Irvine, Jun 14 2018

Status

approved