OFFSET
1
LINKS
MATHEMATICA
Array[Boole[PrimeOmega[#] == 2 IntegerExponent[#, 2]] &, 122] (* Michael De Vlieger, Nov 02 2022 *)
PROG
(PARI) A356170(n) = (bigomega(n) == 2*valuation(n, 2));
CROSSREFS
KEYWORD
nonn
AUTHOR
Antti Karttunen, Nov 02 2022
STATUS
approved