OFFSET
1
COMMENTS
Characteristic function of numbers A007774.
Sum_{n>=1} a(n)/n^s = Sum_(A001221(n)=2, 1/n^s) = 1/2((Sum_(p prime, 1/(p^s-1))^2 - Sum_(p prime, 1/(p^s-1)^2)). - Enrique Pérez Herrero, Aug 14 2012
LINKS
Enrique Pérez Herrero, Table of n, a(n) for n = 1..5000
MATHEMATICA
Table[Boole[PrimeNu[n]==2], {n, 1, 200}]
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Enrique Pérez Herrero, Aug 12 2012
STATUS
approved