OFFSET
1,1
LINKS
Amiram Eldar, Table of n, a(n) for n = 1..10000
EXAMPLE
For p = 233, the next prime number is 239. The numbers between 233 and 237 and the prime divisors are respectively 234 {2, 3, 13}, 235 {5, 47}, 236 {2, 59}, 237 {3, 79 }, 238 {2, 7, 17}. The set of prime divisors is {2, 3, 5, 7, 13, 17, 47, 59, 79} and has 9 elements, so 233 is a term.
PROG
(Magma) a:=[]; for p in PrimesInInterval(2, 5000) do b:={}; for s in [p..NextPrime(p)-1] do if not IsPrime(s) then b:=b join Set(PrimeDivisors(s)); end if; end for; if #Set(b) eq 9 then Append(~a, p); end if; end for; a; // Marius A. Burtea, Sep 26 2019
CROSSREFS
KEYWORD
nonn
AUTHOR
Amarnath Murthy, Sep 26 2002
EXTENSIONS
More terms from Matthew Conroy, Apr 30 2003
STATUS
approved
