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 A074098 #18 Jan 10 2025 14:48:36
%S A074098 4,5,10,275,508,3694,5675,6562,32420,137782,295409,430645,13564046,
%T A074098 22289981,387420490,3486784402
%N A074098 Where records occur in A074078.
%C A074098 RECORDS transform of A074078.
%H A074098 N. J. A. Sloane, <a href="/transforms.txt">Transforms</a>
%t A074098 ce[n_] := Length[NestWhileList[(n/3)*Ceiling[#] &, n/3, ! IntegerQ[#] &]] - 1; t = {}; r = 0; Do[If[ce[n] > r, AppendTo[t, n]; r = ce[n]], {n, 3, 5*10^5}]; t (* _Jayanta Basu_, Jul 31 2013 *)
%Y A074098 Cf. A074078, A074097.
%K A074098 nonn,more
%O A074098 1,1
%A A074098 _N. J. A. Sloane_, Sep 17 2002
%E A074098 a(9)-a(12) from _Jayanta Basu_, Jul 31 2013
%E A074098 a(13)-a(14) from _Sean A. Irvine_, Jan 09 2025
%E A074098 a(15)-a(16) from _Michael S. Branicky_, Jan 09 2025