A166607 Numbers k such that Sum_{i=1..k} i^7 divides Product_{i=1..k} i^7.

1, 733, 1637, 2096, 2367, 4231, 5674, 5839, 7585, 8344, 13719, 13753, 14983, 15151, 15197, 15257, 15757, 16595, 17305, 18791, 20701, 21442, 23652, 23738, 24519, 24789, 25474, 25916, 25933, 27474, 27487, 29185, 31455, 32846, 32950, 33421

Offset: 1

Author

Alexander Adamchuk, Oct 18 2009

Keywords

• nonn

Examples

			a(2) = A125314(7) = 733.
		

Crossrefs

Cf. A123314, A166602, A060462, A166604, A166605, A166606, A166608, A166609, A166610.

Programs

Mathematica

With[{c=Range[40000]^7},Flatten[Position[#[[1]]/#[[2]]&/@Thread[ {Rest[ FoldList[ Times,1,c]],Accumulate[c]}],?IntegerQ]]] (* _Harvey P. Dale, Nov 16 2014 *)

Extensions

More terms from Max Alekseyev, Sep 30 2010