OFFSET
1,3
COMMENTS
Numbers not in the sequence appear to include 1, 3, 27, 51, 108, 218, 392, 486, 937.
a(n) >= the number of m with A340752(m) <= prime(n).
LINKS
Robert Israel, Table of n, a(n) for n = 1..10000
EXAMPLE
For n=6 the a(6) = 4 primes are 2, 3, 5 and 11: 2 divides all but 13-2, 3 divides 13-8, 5 divides 13-3 and 11 divides 13-2.
MAPLE
f:= 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));
nops(P)
end proc:
map(f, [$1..100]);
CROSSREFS
KEYWORD
nonn
AUTHOR
J. M. Bergot and Robert Israel, Jan 18 2021
STATUS
approved