A086732 Convolution of A000203 with partition function (A000041) of positive integers.
1, 5, 13, 29, 54, 97, 161, 257, 402, 604, 896, 1299, 1866, 2616, 3665, 5031, 6891, 9290, 12498, 16600, 22008, 28841, 37740, 48919, 63294, 81230, 104048, 132355, 168048, 212070, 267105, 334671, 418486, 520857, 647081, 800531, 988510, 1216159
Offset: 1
Keywords
Links
- Harvey P. Dale, Table of n, a(n) for n = 1..1000
Programs
-
Magma
[ (n+1)*NumberOfPartitions(n+1)-SumOfDivisors(n+1): n in [1..38] ]; // Klaus Brockhaus, Jul 07 2009
-
Mathematica
Table[n PartitionsP[n]-DivisorSigma[1,n],{n,2,40}] (* Harvey P. Dale, Jun 28 2012 *)
-
PARI
a(n) = (n+1)*numbpart(n+1) - sigma(n+1); \\ Michel Marcus, Feb 19 2018
Formula
Extensions
More terms from Klaus Brockhaus, Jul 07 2009
Definition clarified by Omar E. Pol, Feb 13 2021
Comments