|
Search: id:A061256
|
|
| |
|
| 1, 1, 4, 8, 21, 39, 92, 170, 360, 667, 1316, 2393, 4541, 8100, 14824, 26071, 46422, 80314, 139978, 238641, 408201, 686799, 1156062, 1920992, 3189144, 5238848, 8589850, 13963467, 22641585, 36447544, 58507590, 93334008, 148449417
(list; graph; listen)
|
|
|
OFFSET
|
0,3
|
|
|
LINKS
|
N. J. A. Sloane, Transforms
|
|
FORMULA
|
G.f.: Product_{k=1..infinity} (1 - x^k)^(-sigma(k)). a(n)=1/n*Sum_{k=1..n} a(n-k)*b(k), n>1, a(0)=1, b(k)=Sum_{d|k} d*sigma(d), cf. A001001.
G.f.: A(x) = exp( Sum_{n>=1} sigma(n)*x^n/(1-x^n)^2 /n ). [From Paul D. Hanna (pauldhanna(AT)juno.com), Mar 28 2009]
Also A(x) = exp( Sum_{n>=1} sigma_2(n)*x^n/(1-x^n)/n ). [From Vladeta Jovovic (vladeta(AT)eunet.yu), Mar 28 2009]
|
|
PROGRAM
|
(PARI) 1/prod(j=1, N, eta(x^j)^j); Vec(%) - Joerg Arndt (arndt(AT)jjj.de), May 03 2008
(PARI) {a(n)=if(n==0, 1, polcoeff(exp(sum(m=1, n, sigma(m)*x^m/(1-x^m+x*O(x^n))^2/m)), n))} [From Paul D. Hanna (pauldhanna(AT)juno.com), Mar 28 2009]
|
|
CROSSREFS
|
Cf. A000203, A001001, A006171, A001970, A061255, A061257.
Sequence in context: A094878 A079860 A006908 this_sequence A097076 A077921 A003608
Adjacent sequences: A061253 A061254 A061255 this_sequence A061257 A061258 A061259
|
|
KEYWORD
|
easy,nonn
|
|
AUTHOR
|
Vladeta Jovovic (vladeta(AT)eunet.rs), Apr 21 2001
|
|
|
Search completed in 0.002 seconds
|
