A141667 Number of partitions of n times number of divisors of n.

1, 4, 6, 15, 14, 44, 30, 88, 90, 168, 112, 462, 202, 540, 704, 1155, 594, 2310, 980, 3762, 3168, 4008, 2510, 12600, 5874, 9744, 12040, 22308, 9130, 44832, 13684, 50094, 40572, 49240, 59532, 161793, 43274, 104060, 124740, 298704, 89166, 425392, 126522, 451050

Offset

1,2

Links

G. C. Greubel, Table of n, a(n) for n = 1..5000

Formula

a(n) = p(n) * d(n) = A000041(n) * A000005(n).

Mathematica

f[n_] = DivisorSigma[0, n]*PartitionsP[n]; Table[f[n], {n, 1, 30}]

Prog

(PARI) al(n)=vector(n, k, numbpart(k)*numdiv(k))

Crossrefs

Cf. A000005, A000041, A144300, A195364.

Sequence in context: A365074 A284123 A135093 * A048753 A055719 A349157

Adjacent sequences: A141664 A141665 A141666 * A141668 A141669 A141670

Keyword

nonn

Author

Roger L. Bagula and Gary W. Adamson, Sep 06 2008

Extensions

Edited with more terms by Franklin T. Adams-Watters, Sep 16 2011

Status

approved