login
A011193
Coefficients in expansion of sqrt(2) as Sum_{n>=1} a(n)/(n*n!*(n+1)!), as found by greedy algorithm.
2
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
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
KEYWORD
nonn
AUTHOR
EXTENSIONS
Offset corrected and more terms from Sean A. Irvine, Jun 14 2018
STATUS
approved