OFFSET
1,1
COMMENTS
LINKS
Robert Israel, Table of n, a(n) for n = 1..10000
EXAMPLE
a(1) = 5 because five is the first prime in alphabetical order.
a(5) = 89 because eighty-nine is the first 2-digit prime in alphabetical order.
MAPLE
V:= [seq(select(isprime, [$10^i..10^(i+1)-1]), i=0..3)]:
seq(op(V[i][sort(map(convert, V[i], english, 'And'),
output=permutation)]), i=1..nops(V)); # Robert Israel, Jun 17 2016
MATHEMATICA
alph = Last /@ Import["https://oeis.org/A000052/b000052.txt", "Table"]; Take[
Select[alph, PrimeQ], 58] (* Giovanni Resta, Jun 17 2016 *)
CROSSREFS
KEYWORD
base,easy,nonn,word
AUTHOR
Jonathan Vos Post, Jul 07 2005
EXTENSIONS
Corrected and extended by Giovanni Resta, Jun 17 2016
STATUS
approved