OFFSET
1,1
LINKS
Robert Israel, Table of n, a(n) for n = 1..3000
EXAMPLE
a(3) = 11 is a term because there are 2 primes that divide at least one of 11-2 = 9, 11-3 = 8, 11-5 = 6 and 11-7 = 4, namely 2 and 3, and 2 is prime.
MAPLE
filter:= proc(n) local L, P, i, t;
L:= [seq(ithprime(n)-ithprime(i), i=1..n-1)];
P:= `union`(seq(numtheory:-factorset(t), t=L));
isprime(nops(P))
end proc:
map(ithprime, select(filter, [$1..1000]));
CROSSREFS
KEYWORD
nonn
AUTHOR
J. M. Bergot and Robert Israel, Jan 19 2021
STATUS
approved