A166606 Numbers k such that Sum_{i=1..k} i^6 divides Product_{i=1..k} i^6.

1, 1556, 1640, 3907, 5642, 6205, 7238, 8311, 10350, 11551, 12499, 13371, 13812, 17524, 17589, 18162, 18790, 21569, 21573, 22381, 22544, 23809, 24312, 24416, 24598, 24629, 25247, 25463, 26093, 26583, 26829, 27091, 27098, 28646, 28804

Offset: 1

Author

Alexander Adamchuk, Oct 18 2009

Keywords

• nonn

Examples

			a(2) = A125314(6) = 1556.
		

Crossrefs

Cf. A125314, A166602, A060462, A166604, A166605, A166607, A166608, A166609, A166610.

Programs

Mathematica

k = s = 1; p = 1; lst = {}; While[k < 5000, If[Mod[p, s] == 0, AppendTo[lst, k]]; k++; s = s + k^6; p = p*k^6]; lst (* G. C. Greubel, May 18 2016 *)

Extensions

More terms from Max Alekseyev, Sep 30 2010