This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A166607 #6 Nov 16 2014 16:13:29 %S A166607 1,733,1637,2096,2367,4231,5674,5839,7585,8344,13719,13753,14983, %T A166607 15151,15197,15257,15757,16595,17305,18791,20701,21442,23652,23738, %U A166607 24519,24789,25474,25916,25933,27474,27487,29185,31455,32846,32950,33421 %N A166607 Numbers k such that Sum_{i=1..k} i^7 divides Product_{i=1..k} i^7. %e A166607 a(2) = A125314(7) = 733. %t A166607 With[{c=Range[40000]^7},Flatten[Position[#[[1]]/#[[2]]&/@Thread[ {Rest[ FoldList[ Times,1,c]],Accumulate[c]}],_?IntegerQ]]] (* _Harvey P. Dale_, Nov 16 2014 *) %Y A166607 Cf. A123314, A166602, A060462, A166604, A166605, A166606, A166608, A166609, A166610. %K A166607 nonn %O A166607 1,2 %A A166607 _Alexander Adamchuk_, Oct 18 2009 %E A166607 More terms from _Max Alekseyev_, Sep 30 2010