login
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= -31.
0

%I #7 Jul 30 2020 12:19:54

%S 1,2,4,5,7,8,9,10,14,16,18,19,20,25,28,31,32,35,36,38,40,41,45,47,49,

%T 50,56,59,62,63,64,67,70,71,72,76,80,81,82,90,94,95,97,98,100,101,103,

%U 107,109,112,113,118,121,124,125,126,128,131,133,134,140,142

%N 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= -31.

%o (PARI) m=-31; select(x -> x, direuler(p=2,101,1/(1-(kronecker(m,p)*(X-X^2))-X)), 1)

%Y Cf. A035159 (the expansion itself).

%K nonn

%O 1,2

%A _N. J. A. Sloane_

%E Edited and extended by _Andrey Zabolotskiy_, Jul 30 2020