OFFSET
1,1
LINKS
Jinyuan Wang, Table of n, a(n) for n = 1..10000
EXAMPLE
7 (prime) is a term because prime(7)=17 and 7 and 17 have 7 as their largest digit.
29 (prime) is a term because prime(29)=109 and 29 and 109 have 9 as their largest digit.
37 (prime) is a term because prime(37)=157 and 37 and 157 have 7 as their largest digit.
MAPLE
A054055 := proc(n) max( op(convert(n, base, 10)) ) ; end proc:
for n from 2 to 2200 do if isprime(n) then if A054055(n) = A054055(ithprime(n)) then printf("%d, ", n) ; end if; end if; end do: # R. J. Mathar, May 10 2010
PROG
(PARI) forprime(p=1, 1489, if(vecmax(digits(p))==vecmax(digits(prime(p))), print1(p, ", "))) \\ Jinyuan Wang, Feb 13 2019
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Juri-Stepan Gerasimov, Jan 23 2009
EXTENSIONS
Most terms > 300 corrected by R. J. Mathar, May 10 2010
STATUS
approved
