|
|
A011191
|
|
Coefficients in expansion of Pi as Sum_{n>=1} a(n)/(n*n!*(n+1)!), as found by greedy algorithm.
|
|
2
|
|
|
6, 3, 7, 4, 18, 1, 21, 35, 76, 82, 56, 25, 98, 149, 111, 170, 166, 195, 113, 306, 221, 367, 533, 373, 360, 675, 7, 262, 194, 669, 776, 1083, 384, 617, 725, 752, 122, 1131, 514, 992, 1238, 600, 1380, 1306, 1991, 1983, 114, 2021, 534, 1660, 192, 733, 1596, 1898
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
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[Pi, 50] (* Amiram Eldar, Mar 11 2022 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|