|
|
A192655
|
|
Floor-Sqrt transform of central binomial coefficients (A000984).
|
|
2
|
|
|
1, 1, 2, 4, 8, 15, 30, 58, 113, 220, 429, 839, 1644, 3224, 6333, 12454, 24516, 48307, 95263, 188003, 371276, 733660, 1450551, 2869395, 5678697, 11243247, 22269228, 44124136, 87456792, 173399153, 343896178, 682223096, 1353744488, 2686899408, 5334139244, 10591802387
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,3
|
|
LINKS
|
|
|
FORMULA
|
a(n) = floor(sqrt(binomial(2*n,n)).
|
|
MATHEMATICA
|
Table[Floor[Sqrt[Binomial[2n, n]]], {n, 0, 100}]
|
|
PROG
|
(Maxima) makelist(floor(sqrt(binomial(2*n, n))), n, 0, 24);
(Magma) [Floor(Sqrt(Binomial(2*n, n))): n in [0..40]]; // Vincenzo Librandi, Apr 01 2012
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|