%I #7 Jul 30 2020 12:20:07
%S 1,3,4,5,9,11,12,13,15,16,19,20,25,27,29,31,33,36,39,43,44,45,47,48,
%T 49,52,53,55,57,60,64,65,75,76,79,80,81,87,93,95,99,100,108,109,116,
%U 117,121,124,125,127,129,131,132,135,141,143,144,145,147,149,155
%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= -29.
%o (PARI) m=-29; select(x -> x, direuler(p=2,101,1/(1-(kronecker(m,p)*(X-X^2))-X)), 1)
%Y Cf. A035161 (the expansion itself).
%K nonn
%O 1,2
%A _N. J. A. Sloane_
%E Edited and extended by _Andrey Zabolotskiy_, Jul 30 2020
|