OFFSET
1,1
LINKS
Robert Israel, Table of n, a(n) for n = 1..10000
EXAMPLE
a(5) = 71 is in the sequence because sod(71,10) = 8, sod(71,8) = 8 (since 71 = 107_8), and 71+8=79 is prime.
MAPLE
sod:= proc(x, b) if b=1 then x else convert(convert(x, base, b), `+`) fi end proc:
select(p -> isprime(p+sod(p, sod(p, 10))), [seq(ithprime(i), i=1..1000)]);
CROSSREFS
KEYWORD
nonn,base
AUTHOR
J. M. Bergot and Robert Israel, Dec 08 2020
STATUS
approved