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 A329878 #9 Nov 25 2019 03:31:15
%S A329878 1,6,12,18,24,36,48,54,72,96,108,144,150,162,192,216,288,294,300,324,
%T A329878 384,432,450,486,576,588,600,648,726,750,768,864,882,900,972,1152,
%U A329878 1176,1200,1296,1350,1452,1458,1500,1536,1728,1734,1764,1800,1944,2058,2178
%N A329878 Numbers k such that k and psi(k) have the same set of prime divisors, where psi is the Dedekind psi function (A001615).
%C A329878 Numbers k such that rad(psi(k)) = rad(k), where rad(k) is the squarefree kernel of k (A007947).
%H A329878 Amiram Eldar, <a href="/A329878/b329878.txt">Table of n, a(n) for n = 1..10000</a>
%e A329878 6 is in the sequence since 6 = 2 * 3 and psi(6) = 12 = 2^2 * 3 have the same set of prime divisors, {2, 3}.
%t A329878 rad[n_] := Times @@ (First@# & /@ FactorInteger@ n); psi[1] = 1; psi[n_] := n * Times @@ (1 + 1/Transpose[FactorInteger[n]][[1]]); Select[Range[2000], rad[psi[#]] == rad[#] &]
%Y A329878 Cf. A001615, A007947, A027598, A055744.
%K A329878 nonn
%O A329878 1,2
%A A329878 _Amiram Eldar_, Nov 23 2019