|
| |
|
|
A068102
|
|
a(n)=n!*2^n*sum(i=1,n,1/i/2^i).
|
|
2
| |
|
|
1, 5, 32, 262, 2644, 31848, 446592, 7150512, 128749536, 2575353600, 56661408000, 1359913708800, 35358235430400, 990036819072000, 29701191750451200, 950439443688806400, 32314962008209305600, 1163338987982963097600
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,2
|
|
|
FORMULA
| E.g.f.: -ln(1-x)/(1-2*x). - Vladeta Jovovic (vladeta(AT)eunet.rs), Feb 07 2003
a(0)=0, a(n+1)=2*(n+1)*a(n)+n! [From Jaume Oliver Lafont (joliverlafont(AT)gmail.com), Sep 15 2009]
|
|
|
MATHEMATICA
| a[n_] := FullSimplify[n! (2^n Log[2] - LerchPhi[1/2, 1, 1 + n]/2)]; Array[a, 10] (* Vladimir Reshetnikov, Jan 21 2011 *)
|
|
|
CROSSREFS
| Cf. A000254, A069015.
Sequence in context: A102231 A127089 A198598 * A166993 A001923 A023880
Adjacent sequences: A068099 A068100 A068101 * A068103 A068104 A068105
|
|
|
KEYWORD
| easy,nonn
|
|
|
AUTHOR
| Benoit Cloitre (benoit7848c(AT)orange.fr), Apr 14 2002
|
| |
|
|
