OFFSET
1,1
LINKS
Zak Seidov, Table of n, a(n) for n = 1..1000
EXAMPLE
MATHEMATICA
Select[Table[6n(n-1)+1, {n, 100}], PrimeOmega[#]==2&] (* Harvey P. Dale, Sep 01 2014 *)
PROG
(PARI) lista(nn) = {for (n = 1, nn, if (bigomega(v = 6*n*(n-1) + 1) == 2, print1(v, ", ")); ); } \\ Michel Marcus, Nov 09 2013
CROSSREFS
KEYWORD
nonn
AUTHOR
Zak Seidov, Oct 22 2012
STATUS
approved