A086735 Convolution of the prime numbers with phi(n) convoluted with sigma(n).

0, 0, 2, 11, 35, 92, 203, 416, 766, 1356, 2235, 3593, 5472, 8224, 11858, 16918, 23364, 32036, 42723, 56708, 73611, 95090, 120642, 152506, 189674, 235332, 288044, 351423, 424108, 510596, 608196, 723484, 852906, 1003174, 1171393, 1365498, 1580008, 1826770, 2098499, 2406590, 2745896, 3129158

Offset

0,3

Links

Table of n, a(n) for n=0..41.

Mathematica

Table[Sum[Sum[Prime[j]*EulerPhi[k - j], {j, 1, k - 1}] * DivisorSigma[1, n - k], {k, 1, n - 1}], {n, 1, 50}] (* Vaclav Kotesovec, Apr 12 2019 *)

Crossrefs

Cf. A000010, A000040, A000203, A086734.

Sequence in context: A205342 A000914 A256317 * A242300 A078982 A154416

Adjacent sequences: A086732 A086733 A086734 * A086736 A086737 A086738

Keyword

nonn

Author

Jon Perry, Jul 29 2003

Extensions

Name and offset corrected and more terms added by Ilya Gutkovskiy, Apr 12 2019

Status

approved