|
| |
|
|
A087761
|
|
Expansion of (1-x)^(1/(x-1)).
|
|
0
| |
|
|
1, 1, 4, 21, 140, 1130, 10674, 115206, 1396016, 18739080, 275712840, 4408612560, 76070179272, 1408041937848, 27816773482848, 583970117197320, 12978149959718400, 304310928180279360, 7506092106055537344
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 0,3
|
|
|
FORMULA
| a(n) = Sum_{k=0..n} |Stirling1(n, k)|*A000248(k).
Contribution from Paul D. Hanna (pauldhanna(AT)juno.com), Mar 17 2010: (Start)
E.g.f.: exp( Sum_{n>=1} H(n)*x^n ) where H(n) is the n-th harmonic number;
a(n) = (n-1)!*Sum_{k=0..n-1} (n-k)*H(n-k)*a(k)/k! for n>0 with a(0)=1. (End)
|
|
|
PROG
| (PARI) a(n)=if(n==0, 1, (n-1)!*sum(k=0, n-1, (n-k)*sum(j=1, n-k, 1/j)*a(k)/k!)) [From Paul D. Hanna (pauldhanna(AT)juno.com), Mar 17 2010]
|
|
|
CROSSREFS
| Cf. A005727.
Sequence in context: A052852 A121124 A180399 * A120368 A053482 A158577
Adjacent sequences: A087758 A087759 A087760 * A087762 A087763 A087764
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Vladeta Jovovic (vladeta(AT)eunet.rs), Oct 02 2003
|
|
|
EXTENSIONS
| Program corrected by Paul D. Hanna (pauldhanna(AT)juno.com), Mar 19 2010
|
| |
|
|
