OFFSET
1,1
COMMENTS
Primes p such that p-1 and p+1 are 10-almost primes.
LINKS
Zak Seidov, Table of n, a(n) for n = 1..1186
EXAMPLE
3885569 - 1 = 2^9 * 7589;
3885569 + 1 = 2 * 3^6 * 5 * 13 * 41.
MATHEMATICA
Select[Prime[Range[2678000]], PrimeOmega[#-1]==PrimeOmega[#+1]==10&] (* Harvey P. Dale, Jul 05 2019 *)
PROG
(PARI) is(n)=bigomega(n-1)==10 && bigomega(n+1)==10 && isprime(n) \\ Charles R Greathouse IV, Apr 27 2015
CROSSREFS
KEYWORD
nonn
AUTHOR
Zak Seidov, Jan 10 2015
STATUS
approved