OFFSET
1,1
COMMENTS
All terms are coprime to 10. - Robert Israel, Dec 04 2016
LINKS
Robert Israel, Table of n, a(n) for n = 1..10000
EXAMPLE
E.g. 21 in base 21 is 2*21+1=43, 111 is 1*111*111+1*111+1=12433, etc.
MAPLE
filter:= proc(n) local L, i;
L:= convert(n, base, 10);
isprime(add(L[i]*n^(i-1), i=1..nops(L)))
end proc:
select(filter, [seq(i, i=11..2000, 2)]); # Robert Israel, Dec 04 2016
PROG
(PARI) isok(n) = (n>=10) && isprime(fromdigits(digits(n), n)); \\ Michel Marcus, Dec 04 2016
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Jon Perry, Oct 06 2001
EXTENSIONS
Offset corrected by Arkadiusz Wesolowski, Oct 19 2013
Name corrected by Robert Israel, Dec 04 2016
STATUS
approved