Annual Appeal: Please make a donation (tax deductible in USA) to keep the OEIS running. Over 4500 articles have referenced us, often saying "we would not have discovered this result without the OEIS".
1,1
a(n) = A054055(A000040(n)) = A262410(A000040(n)). - Reinhard Zumkeller, Sep 25 2015
Reinhard Zumkeller, Table of n, a(n) for n = 1..78498, all primes < 10^6.
Table[Max[IntegerDigits[Prime[w]]], {w, 1, 1000}]
(PARI) a(n) = vecmax(digits(prime(n))); \\ Michel Marcus, Dec 26 2013
(Haskell)
a060418 = a054055 . a000040 -- Reinhard Zumkeller, Sep 25 2015
Cf. A054055.
Cf. A262401.
Sequence in context: A074462 A113656 A007652 * A199975 A086355 A053666
Adjacent sequences: A060415 A060416 A060417 * A060419 A060420 A060421
base,easy,nonn
Labos Elemer, Apr 05 2001
Offset corrected to 1 by Michel Marcus, Dec 26 2013
approved