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 A362184 #8 Apr 11 2023 04:18:01
%S A362184 1,2,3,4,5,6,7,8,9,10,11,13,14,16,17,21,23,25,26,27,31,33,34,37,38,45,
%T A362184 49,54,59,62,64,71,80,81,84,92,99,106,122,137,145,147,167,174,180,183,
%U A362184 203,211,231,232,251,253,283,289,306,318,342,362,378,410,412,453
%N A362184 Record values in A362183.
%H A362184 Amiram Eldar, <a href="/A362184/b362184.txt">Table of n, a(n) for n = 1..96</a>
%F A362184 a(n) = A362181(A362183(n)).
%t A362184 ucototient[n_] := n - Times @@ (Power @@@ FactorInteger[n] - 1); ucototient[1] = 0; With[{max = 300}, solnum = Table[0, {n, 1, max}]; Do[If[(i = ucototient[k]) <= max, solnum[[i]]++], {k, 2, max^2}]; s = {1}; solmax=1; Do[sol = solnum[[k]]; If[sol > solmax, solmax = sol; AppendTo[s, sol]], {k, 2, max}]; s]
%Y A362184 The unitary version of A101373.
%Y A362184 Cf. A362181, A362183.
%Y A362184 Similar sequences: A131934, A361971.
%K A362184 nonn
%O A362184 1,2
%A A362184 _Amiram Eldar_, Apr 10 2023