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 A087267 #11 Apr 23 2018 08:38:10 %S A087267 1,1,1,2,1,3,1,4,1,2,1,1,1,2,3,2,1,1,1,4,1,2,1,3,1,1,9,1,1,10,1,1,11, %T A087267 1,1,1,1,2,3,4,1,1,1,2,1,2,1,3,1,5,3,1,1,2,1,8,1,2,1,1,1,2,9,2,1,6,1, %U A087267 1,1,1,1,4,1,1,3,1,7,3,1,2,1,2,1,1,1,1,1,1,1,6,1,4,3,2,1,24,1,1,1,25,1,2,1 %N A087267 a(n) = gcd(n, pi(n)) where pi is A000720. %H A087267 Ivan Neretin, <a href="/A087267/b087267.txt">Table of n, a(n) for n = 1..10000</a> %t A087267 Table[GCD[w, PrimePi[w]], {w, 1, 256}] %o A087267 (PARI) a(n) = gcd(n, primepi(n)); \\ _Michel Marcus_, Apr 22 2018 %Y A087267 Cf. A007053, A000720, A087266, A057809. %K A087267 nonn %O A087267 1,4 %A A087267 _Labos Elemer_, Sep 16 2003