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 A064558 #6 Nov 21 2021 07:34:22 %S A064558 1,2,3,4,4,6,4,8,9,8,6,12,5,8,12,16,8,18,9,16,12,12,8,24,16,10,27,16, %T A064558 6,24,12,32,18,16,16,36,7,18,15,32,10,24,12,24,36,16,16,48,16,32,24, %U A064558 20,8,54,24,32,27,12,18,48,9,24,36,64,20,36,16,32,24,32,15,72,12,14,48,36 %N A064558 a(n) = A064553(A064553(n)). %t A064558 b[n_] := Product[{p, e} = pe; (PrimePi[p] + 1)^e, {pe, FactorInteger[n]}]; %t A064558 a[n_] := b[b[n]]; %t A064558 Array[a, 100] (* _Jean-François Alcover_, Nov 21 2021 *) %K A064558 mult,nonn %O A064558 1,2 %A A064558 _Reinhard Zumkeller_, Sep 21 2001