A183009 a(n) = 24*n*p(n) = 24*n*A000041(n).
24, 96, 216, 480, 840, 1584, 2520, 4224, 6480, 10080, 14784, 22176, 31512, 45360, 63360, 88704, 121176, 166320, 223440, 300960, 399168, 529056, 692760, 907200, 1174800, 1520064, 1950480, 2498496, 3177240, 4034880, 5090448, 6412032
Offset: 1
Examples
The number of partitions of 6 is p(6) = A000041(6) = 11, so a(6) = 24*6*11 = 1584. Also the trace Tr(6) = A183011(6) = 1573, so a(6) = p(6) + Tr(6) = 11 + 1573 = 1584.
Crossrefs
Programs
-
Mathematica
Table[24n*PartitionsP[n],{n,40}] (* Harvey P. Dale, Mar 07 2019 *)
Comments