OFFSET
1,1
COMMENTS
Next term, if any, > 2*10^8.
FORMULA
a(n) = prime(k) where A339327(k) = prime(k-1).
EXAMPLE
MAPLE
spf:= n -> add(t[1]*t[2], t=ifactors(n)[2]):
p:= 1: R:= NULL:
while p < 10^7 do
q:= p: p:= nextprime(p);
v:= spf(p-1)*spf(p+1) mod p;
if v = q then R:= R, p fi
od:
R;
CROSSREFS
KEYWORD
nonn,bref,more
AUTHOR
Robert Israel, Nov 30 2020
STATUS
approved