login
A035234
Indices of the nonzero terms in expansion of Dirichlet series Product_p (1-(Kronecker(m,p)+1)*p^(-s)+Kronecker(m,p)*p^(-2s))^(-1) for m= -37.
0
1, 4, 9, 16, 19, 23, 25, 31, 36, 37, 41, 43, 49, 53, 59, 64, 73, 76, 79, 81, 92, 100, 101, 103, 121, 124, 131, 137, 144, 148, 149, 157, 163, 164, 167, 169, 171, 172, 173, 179, 181, 191, 196, 197, 199, 207, 212, 225, 227, 229, 233, 236, 239, 251, 256, 269, 279
OFFSET
1,2
PROG
(PARI) m=-37; select(x -> x, direuler(p=2, 101, 1/(1-(kronecker(m, p)*(X-X^2))-X)), 1) \\ Fixed by Andrey Zabolotskiy, Jul 30 2020
CROSSREFS
Cf. A035153 (the expansion itself).
Sequence in context: A313323 A313324 A015871 * A313325 A313326 A243174
KEYWORD
nonn
EXTENSIONS
Name corrected and more terms added by Andrey Zabolotskiy, Jul 30 2020
STATUS
approved