OFFSET
1,1
LINKS
Robert Israel, Table of n, a(n) for n = 1..10000
EXAMPLE
a(6) = 23 is a member because it is prime, the next prime is 29, and 23*29 mod (32+92) = 667 mod 124 = 47 is prime.
MAPLE
revdigs:= proc(n) local L, i, m;
L:= convert(n, base, 10); m:= nops(L);
add(L[i]*10^(m-i), i=1..m)
end proc:
q:= 2: qr:= 2:
R:= NULL: count:= 0:
while count < 100 do
p:=q; pr:= qr;
q:= nextprime(p); qr:= revdigs(q); s:= p*q mod (pr+qr);
if isprime(s) then
R:= R, p; count:= count+1;
fi
od:
R;
CROSSREFS
KEYWORD
nonn,base
AUTHOR
J. M. Bergot and Robert Israel, Dec 28 2021
STATUS
approved