|
|
A076726
|
|
a(n) = Sum_{k>=0} k^n/2^k.
|
|
10
|
|
|
2, 2, 6, 26, 150, 1082, 9366, 94586, 1091670, 14174522, 204495126, 3245265146, 56183135190, 1053716696762, 21282685940886, 460566381955706, 10631309363962710, 260741534058271802, 6771069326513690646
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,1
|
|
LINKS
|
|
|
FORMULA
|
a(0) = 2, a(n) = Sum_{k=0..n-1} binomial(n,k)*a(k) for n >= 1.
G.f.: Sum_{k>=0} 1/(2^k*(1-k*x)).
E.g.f.: 1/(1-exp(x)/2). (End)
|
|
EXAMPLE
|
a(0) = 2 because 1 + 1/2 + 1/4 + 1/8 + 1/16 + 1/32 + ... = 2; a(1) = 2 because 0 + 1/2 + 2/4 + 3/8 + 4/16 + 5/32 + ... = 2.
G.f. = 2 + 2*x + 6*x^2 + 26*x^3 + 150*x^4 + 1082*x^5 + 9366*x^6 + 94586*x^7 + ...
|
|
MATHEMATICA
|
a[n_] := Sum[(k^n)/(2^k), {k, 0, Infinity}]; Table[ a[n], {n, 0, 18}]
|
|
PROG
|
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Charles G. Waldman (cgw(AT)alum.mit.edu), Oct 27 2002
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|