OFFSET
1,1
LINKS
Antti Karttunen, Table of n, a(n) for n = 1..24567; terms < 2^16
FORMULA
Sum_{n>=1} 1/a(n)^s = (2^s/(2^s-1)) * ((1/2)*(P(s)^2 - P(2*s)) + 1/4^s - P(s)/2^s), for s>1, where P is the prime zeta function. - Amiram Eldar, Jan 03 2022
MATHEMATICA
semiQ[n_] := FactorInteger[n][[;; , 2]] == {1, 1}; Select[Range[230], semiQ[#/2^IntegerExponent[#, 2]] &] (* Amiram Eldar, Jan 03 2022 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Antti Karttunen, Jan 06 2021
STATUS
approved