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 A068212 #11 Jan 03 2017 02:26:30 %S A068212 1,1,2,1,2,2,2,2,2,2,4,2,4,4,8,2,6,4,4,2,2,4,4,4,6,4,4,4,6,8,4,8,8,4, %T A068212 12,6,8,8,8,4,6,4,8,2,2,8,6,4,16,8,4,6,8,8,12,4,2,8,12,6,12,16,16,4,6, %U A068212 16,4,8,10,8,24,12,8,12,12,8,6,16,18,8,2,8,32,6,8,8,8,8,24,4,12,2,24 %N A068212 a(n) = phi(n) divided by its largest prime factor. %F A068212 a(n) = A052126(A000010(n)) = A000010(n)/A068211(n) = A000010(n)/A006530(A000010(n)). %t A068212 epn[n_]:=Module[{e=EulerPhi[n]},e/FactorInteger[e][[-1,1]]]; Array[ epn,100,3] (* _Harvey P. Dale_, Apr 18 2012 *) %Y A068212 Cf. A000010, A006530, A052126, A068211. %K A068212 nonn %O A068212 3,3 %A A068212 _Labos Elemer_, Feb 21 2002