A195364 Number of partitions of n plus number of divisors of n.

2, 4, 5, 8, 9, 15, 17, 26, 33, 46, 58, 83, 103, 139, 180, 236, 299, 391, 492, 633, 796, 1006, 1257, 1583, 1961, 2440, 3014, 3724, 4567, 5612, 6844, 8355, 10147, 12314, 14887, 17986, 21639, 26019, 31189, 37346, 44585, 53182, 63263, 75181, 89140, 105562, 124756

Offset: 1

Author

Franklin T. Adams-Watters, Sep 16 2011

Keywords

• nonn

Links

• Harvey P. Dale, Table of n, a(n) for n = 1..1000

Crossrefs

Cf. A000041, A000005, A144300.

Programs

Mathematica

Table[PartitionsP[n]+DivisorSigma[0,n],{n,50}] (* Harvey P. Dale, Feb 16 2025 *)

PARI

al(n)=vector(n,k,numbpart(k)+numdiv(k))

Formula

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