|
|
A241524
|
|
a(n) = 4^n*(n/4 + binomial(n+1/2, 1/2)).
|
|
2
|
|
|
1, 7, 38, 188, 886, 4052, 18156, 80152, 349862, 1513604, 6501316, 27759272, 117935548, 498920008, 2102905496, 8835174960, 37015522054, 154690661732, 645017651412, 2684135346184, 11149265820500, 46234832784216, 191441476611688, 791591523218768, 3268982440735836
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,2
|
|
LINKS
|
|
|
FORMULA
|
a(n) = 4^n*(n/4 + 2*Gamma(n+3/2)/(sqrt(Pi)*Gamma(n+1))).
|
|
MAPLE
|
seq(4^n*(n/4 + binomial(n+1/2, 1/2)), n=0..24);
|
|
MATHEMATICA
|
Table[4^n (n/4 + Binomial[n + 1/2, 1/2]), {n, 0, 40}] (* Vincenzo Librandi, Apr 25 2014 *)
|
|
PROG
|
(PARI) for(n=0, 25, print1(round(4^n*(n/4 + 2*gamma(n+3/2)/(sqrt(Pi)*gamma(n+1)))), ", ")) \\ G. C. Greubel, Feb 14 2017
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|