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 A060418 #14 Sep 25 2015 15:24:56 %S A060418 2,3,5,7,1,3,7,9,3,9,3,7,4,4,7,5,9,6,7,7,7,9,8,9,9,1,3,7,9,3,7,3,7,9, %T A060418 9,5,7,6,7,7,9,8,9,9,9,9,2,3,7,9,3,9,4,5,7,6,9,7,7,8,8,9,7,3,3,7,3,7, %U A060418 7,9,5,9,7,7,9,8,9,9,4,9,9,4,4,4,9,4,9,7,6,6,7,9,8,9,9,5,9,5,5,5,7,7,6,9,7 %N A060418 Largest decimal digit in n-th prime. %C A060418 a(n) = A054055(A000040(n)) = A262410(A000040(n)). - _Reinhard Zumkeller_, Sep 25 2015 %H A060418 Reinhard Zumkeller, <a href="/A060418/b060418.txt">Table of n, a(n) for n = 1..78498</a>, all primes < 10^6. %t A060418 Table[Max[IntegerDigits[Prime[w]]], {w, 1, 1000}] %o A060418 (PARI) a(n) = vecmax(digits(prime(n))); \\ _Michel Marcus_, Dec 26 2013 %o A060418 (Haskell) %o A060418 a060418 = a054055 . a000040 -- _Reinhard Zumkeller_, Sep 25 2015 %Y A060418 Cf. A054055. %Y A060418 Cf. A262401. %K A060418 base,easy,nonn %O A060418 1,1 %A A060418 _Labos Elemer_, Apr 05 2001 %E A060418 Offset corrected to 1 by _Michel Marcus_, Dec 26 2013