OFFSET
1,1
LINKS
Charles R Greathouse IV, Table of n, a(n) for n = 1..10000
PROG
(PARI) is(n)=for(k=1, log(n)\log(2)+1, if(bigomega(n+k)==k||bigomega(n-k)==k, return(0))); isprime(n) \\ Charles R Greathouse IV, Dec 10 2013
CROSSREFS
KEYWORD
nonn
AUTHOR
Juri-Stepan Gerasimov, Nov 21 2010
STATUS
approved