|
|
A282708
|
|
a(n) = binomial(2*n,n) - ceiling(2^(2*n)/(n+1)).
|
|
3
|
|
|
0, 0, 0, 4, 18, 81, 338, 1384, 5588, 22405, 89430, 355906, 1413600, 5607109, 22220902, 88008656, 348435254, 1379169043, 5458320734, 21601368452, 85488832259, 338346669389, 1339221309614, 5301399720197, 20988604614673, 83106763866881, 329118546749196, 1303568050309469, 5163945978762924
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,4
|
|
COMMENTS
|
a(n) >= 0.
|
|
REFERENCES
|
P. S. Bullen, A Dictionary of Inequalities, Longman, 1998. See p. 34.
D. S. Mitrinovic, Analytic Inequalities, Springer 1970. See (3.1.28).
|
|
LINKS
|
|
|
MATHEMATICA
|
Table[Binomial[2 n, n] - Ceiling[2^(2 n)/(n + 1)], {n, 0, 40}] (* Vincenzo Librandi, Feb 27 2017 *)
|
|
PROG
|
(Magma) [Binomial(2*n, n)-Ceiling(2^(2*n)/(n+1)): n in [0..30]]; // Vincenzo Librandi, Feb 27 2017
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|