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 A362231 #8 Apr 13 2023 02:35:42
%S A362231 1,2,4,6,8,12,20,24,32,36,44,48,72,80,96,120,128,144,176,192,216,224,
%T A362231 240,264,288,320,336,360,368,384,416,464,480,576,768,864,960,1056,
%U A362231 1280,1344,1440,1536,1728,1920,2016,2208,2400,2496,2688,2784,2880,3168,3360
%N A362231 a(n) = A047994(A362230(n)).
%H A362231 Amiram Eldar, <a href="/A362231/b362231.txt">Table of n, a(n) for n = 1..300</a>
%t A362231 s[n_] := If[(inv = invUPhi[n]) == {}, 0, Max[inv]]; seq[kmax_] := Module[{v = {}, s1, sm = 0}, Do[s1 = s[k]; If[s1 > sm, sm = s1; AppendTo[v, k]], {k, 1, kmax}]; v]; seq[3000] (* using the function invUPhi from A361966 *)
%Y A362231 The unitary version of A036912.
%Y A362231 Indices of records of A362229.
%Y A362231 Cf. A047994, A361966, A362230.
%K A362231 nonn
%O A362231 1,2
%A A362231 _Amiram Eldar_, Apr 12 2023