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 A333046 #10 Mar 06 2020 22:41:12
%S A333046 1,2,3,4,5,18,7,8,9,30,11,36,13,42,45,16,17,54,19,60,63,66,23,72,25,
%T A333046 78,27,84,29,390,31,32,99,102,105,108,37,114,117,120,41,546,43,132,
%U A333046 135,138,47,144,49,150,153,156,53,162,165,168,171,174,59,780,61,186,189,64,195
%N A333046 a(1) = 1; a(n) = n * Sum_{d|n, d < n, gcd(d, n/d) = 1} a(d) / d.
%t A333046 a[1] = 1; a[n_] := a[n] = n Sum[If[GCD[d, n/d] == 1 && d < n, a[d]/d, 0], {d, Divisors[n]}]; Table[a[n], {n, 1, 65}]
%Y A333046 Cf. A000961 (fixed points), A050369, A325446.
%K A333046 nonn
%O A333046 1,2
%A A333046 _Ilya Gutkovskiy_, Mar 06 2020