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,2

Links

Table of n, a(n) for n=1..36.

Example

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

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 *)

Crossrefs

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

Sequence in context: A178093 A143726 A180919 * A346024 A297761 A220625

Adjacent sequences: A166604 A166605 A166606 * A166608 A166609 A166610

Keyword

nonn

Author

Alexander Adamchuk, Oct 18 2009

Extensions

More terms from Max Alekseyev, Sep 30 2010

Status

approved