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

2, 9, 16, 25, 2, 38, 16, 31, 93, 115, 112, 128, 117, 173, 254, 96, 15, 88, 235, 308, 13, 501, 151, 171, 301, 310, 348, 841, 493, 238, 982, 436, 306, 142, 1113, 151, 1361, 586, 1284, 1361, 368, 1685, 1340, 194, 897, 707, 1930, 782, 321, 2237, 27, 1407, 2250, 1226

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[Sqrt[2], 50] (* Amiram Eldar, Mar 11 2022 *)

Crossrefs

Cf. A002193, A011189, A011191.

Sequence in context: A017005 A131189 A288484 * A085960 A051386 A003325

Adjacent sequences: A011190 A011191 A011192 * A011194 A011195 A011196

Keyword

nonn

Author

N. J. A. Sloane.

Extensions

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

Status

approved