OFFSET
1,1
COMMENTS
Inspired by the notion of 'distset' as in A349976, and the general idea of sets of natural numbers as marks of a 'ruler'.
EXAMPLE
a(1) = 88 < p - 3 for prime number p = 97, and there are no primes p1, p2 <= p with 88 = p1 - p2.
MAPLE
primedist := n -> {seq(2*j, j = 0..(ithprime(n) - 3)/2)} minus `union`(seq({seq(abs(ithprime(j) - ithprime(k)), k = 1..j)}, j = 1..n)):
`union`(seq(primedist(j), j = 1..200)); # Peter Luschny, Dec 24 2021
PROG
(PARI) genit(maxx=1300)={arr=List(); forstep(x=2, maxx, 2, q=nextprime(x+2); if(!isprime(q-x), listput(arr, x))); arr; } \\ Bill McEachen, Feb 09 2022
CROSSREFS
KEYWORD
nonn
AUTHOR
Rainer Rosenthal, Dec 24 2021
STATUS
approved