A133041 Sum of n and partition number of n.
1, 2, 4, 6, 9, 12, 17, 22, 30, 39, 52, 67, 89, 114, 149, 191, 247, 314, 403, 509, 647, 813, 1024, 1278, 1599, 1983, 2462, 3037, 3746, 4594, 5634, 6873, 8381, 10176, 12344, 14918, 18013, 21674, 26053, 31224, 37378, 44624, 53216
Offset: 0
Keywords
Links
- G. C. Greubel, Table of n, a(n) for n = 0..5000
Crossrefs
Programs
-
Mathematica
Table[n+PartitionsP[n],{n,0,50}] (* Harvey P. Dale, Jul 17 2014 *)
-
PARI
a(n)=numbpart(n)+n \\ Charles R Greathouse IV, Jan 06 2016
Formula
a(n) = n + partition(n) = n + A000041(n).