OFFSET
1,1
EXAMPLE
MATHEMATICA
Select[Table[(5*n^2 + 5*n + 2)/2, {n, 1, 125}], PrimeOmega[#] == 2 &] (* Amiram Eldar, Mar 17 2025 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Massimo Kofler, Mar 17 2025
STATUS
approved
