|
|
A199297
|
|
Binomial transform of A090426.
|
|
0
|
|
|
1, 3, 13, 59, 257, 1088, 4547, 18906, 78448, 325210, 1347552, 5582415, 23122986, 95771842, 396659584, 1642825239, 6803957409, 28179306468, 116707377067, 483354745392, 2001859113304, 8290886288280, 34337476313478, 142211844759126, 588983541662827
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
COMMENTS
|
a(n)/a(n-1) tends to Pi + 1; e.g., a(21)/a(20) = 4.1415939998...; whereas A090426(n)/A090426(n-1) tends to Pi.
|
|
LINKS
|
|
|
MATHEMATICA
|
r = 25; s = Join[{0, 1}, Table[Floor[Pi^(n + 1)/(Pi^2 + 1)], {n, 2, r}]]; t = Table[Sum[Binomial[n, k]*s[[k + 1]], {k, n}], {n, 0, r}]; Table[t[[n + 1]] - t[[n]], {n, r}] (* Arkadiusz Wesolowski, Jun 01 2013 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|