OFFSET
1,1
COMMENTS
Prime digits are 2, 3, 5 or 7.
EXAMPLE
2=a(1), 3=a(2), 5=a(3), 7=a(4), 11(1 = 1 = nonprime), 13(1 < 3 = prime)=a(5), 17(1 < 7 = prime)=a(6), 19(1 < 9 = nonprime), 23(2 < 3 = prime)=a(7), etc.
MAPLE
ldig := proc(n) max(op(convert(n, base, 10))) ; end: for n from 1 to 800 do p := ithprime(n) ; if isprime(ldig(p)) then printf("%d, ", p) ; fi; od: # R. J. Mathar, Feb 13 2009
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Juri-Stepan Gerasimov, Jan 27 2009
STATUS
approved