login
This site is supported by donations to The OEIS Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A035189 Coefficients in expansion of Dirichlet series Product_p (1-(Kronecker(m,p)+1)*p^(-s)+Kronecker(m,p)*p^(-2s))^(-1) for m = 7. 2
1, 2, 2, 3, 0, 4, 1, 4, 3, 0, 0, 6, 0, 2, 0, 5, 0, 6, 2, 0, 2, 0, 0, 8, 1, 0, 4, 3, 2, 0, 2, 6, 0, 0, 0, 9, 2, 4, 0, 0, 0, 4, 0, 0, 0, 0, 2, 10, 1, 2, 0, 0, 2, 8, 0, 4, 4, 4, 2, 0, 0, 4, 3, 7, 0, 0, 0, 0, 0, 0, 0, 12, 0, 4, 2, 6, 0, 0, 0, 0, 5 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,2

LINKS

G. C. Greubel, Table of n, a(n) for n = 1..10000

MATHEMATICA

a[n_] := If[n < 0, 0, DivisorSum[n, KroneckerSymbol[7, #] &]]; Table[ a[n], {n, 1, 100}] (* G. C. Greubel, Apr 27 2018 *)

PROG

(PARI) m=7; direuler(p=2, 101, 1/(1-(kronecker(m, p)*(X-X^2))-X))

CROSSREFS

Sequence in context: A035167 A071448 A071449 * A197118 A035143 A035173

Adjacent sequences:  A035186 A035187 A035188 * A035190 A035191 A035192

KEYWORD

nonn

AUTHOR

N. J. A. Sloane

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified November 13 04:20 EST 2019. Contains 329085 sequences. (Running on oeis4.)