OFFSET
1
LINKS
FORMULA
MATHEMATICA
Table[If[EvenQ[n]&&OddQ[PrimeOmega[n]], 1, 0], {n, 150}] (* Harvey P. Dale, Jan 12 2024 *)
PROG
(PARI) A353556(n) = ((!(n%2))&&(bigomega(n)%2));
CROSSREFS
KEYWORD
nonn
AUTHOR
Antti Karttunen, May 01 2022
STATUS
approved