OFFSET
1,1
LINKS
Michael De Vlieger, Table of n, a(n) for n = 1..10000
EXAMPLE
MATHEMATICA
Select[Array[3 #^2 - # + 1 &, 100], PrimeOmega[#] == 2 &] (* Michael De Vlieger, Mar 17 2021 *)
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Jonathan Vos Post, Jan 12 2006
STATUS
approved