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 A166605 #9 Jan 18 2025 14:53:25
%S A166605 1,13,64,95,111,118,123,133,134,140,151,177,199,217,229,242,255,264,
%T A166605 274,281,302,305,325,333,338,354,359,365,376,394,411,414,431,433,440,
%U A166605 472,475,477,489,514,525,528,529,537,547,569,574,583,584,585,589,594,615
%N A166605 Numbers k such that Sum_{i=1..k} i^5 divides Product_{i=1..k} i^5.
%H A166605 G. C. Greubel, <a href="/A166605/b166605.txt">Table of n, a(n) for n = 1..10000</a>
%e A166605 a(2) = A125314(5) = 13.
%t A166605 k = s = 1; p = 1; lst = {}; While[k < 100000, If[Mod[p, s] == 0, AppendTo[lst, k]]; k++; s = s + k^5; p = p*k^5]; lst (* _G. C. Greubel_, May 18 2016 *)
%t A166605 Module[{nn=1000,i5},i5=Range[nn]^5;Position[Table[Times@@Take[i5,n]/Total[Take[i5,n]],{n,nn}],_?IntegerQ]]//Flatten (* _Harvey P. Dale_, Jan 18 2025 *)
%Y A166605 Cf. A125314, A166602, A060462, A166604, A166606, A166607, A166608, A166609, A166610.
%K A166605 nonn
%O A166605 1,2
%A A166605 _Alexander Adamchuk_, Oct 18 2009
%E A166605 More terms from _Max Alekseyev_, Sep 29 2010