OFFSET
1,1
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 1..1000
EXAMPLE
MATHEMATICA
Select[ Prime@ Range@ 4200, PrimeOmega[2#+1]==2 && PrimeOmega[4#+3]==3 && PrimeOmega[8#+7]==4 &] (* Robert G. Wilson v, Feb 22 2014 *)
PROG
(PARI) forprime(p=43, 40000, if(bigomega(a=2*p+1)==2&& bigomega(b=2*c+1)==3&&bigomega(c=2*d+1)==4, print(p", ")))
CROSSREFS
KEYWORD
nonn
AUTHOR
Zak Seidov, Feb 20 2014
STATUS
approved