A035188 -id:A035188 - cp's OEIS frontend

A035203 Coefficients in expansion of Dirichlet series Product_p (1-(Kronecker(m,p)+1)p^(-s)+Kronecker(m,p)p^(-2s))^(-1) for m = 21.

1, 0, 1, 1, 2, 0, 1, 0, 1, 0, 0, 1, 0, 0, 2, 1, 2, 0, 0, 2, 1, 0, 0, 0, 3, 0, 1, 1, 0, 0, 0, 0, 0, 0, 2, 1, 2, 0, 0, 0, 2, 0, 2, 0, 2, 0, 2, 1, 1, 0, 2, 0, 0, 0, 0, 0, 0, 0, 2, 2, 0, 0, 1, 1, 0, 0, 2, 2, 0, 0, 0, 0, 0, 0, 3, 0, 0, 0, 2, 2, 1

Offset: 1

N. J. A. Sloane

Coefficients of Dedekind zeta function for the quadratic number field of discriminant 21. See A002324 for formula and Maple code. - N. J. A. Sloane, Mar 22 2022

Amiram Eldar, Table of n, a(n) for n = 1..10000

Dedekind zeta functions for imaginary quadratic number fields of discriminants -3, -4, -7, -8, -11, -15, -19, -20 are A002324, A002654, A035182, A002325, A035179, A035175, A035171, A035170, respectively.
Dedekind zeta functions for real quadratic number fields of discriminants 5, 8, 12, 13, 17, 21, 24, 28, 29, 33, 37, 40 are A035187, A035185, A035194, A035195, A035199, A035203, A035188, A035210, A035211, A035215, A035219, A035192, respectively.
Cf. A038893, A038894.

a[n_] := DivisorSum[n, KroneckerSymbol[21, #] &]; Array[a, 100] (* Amiram Eldar, Oct 11 2022 *)

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

a(n) = sumdiv(n, d, kronecker(21, d)); \\ Amiram Eldar, Nov 19 2023

Asymptotic mean: Limit_{m->oo} (1/m) * Sum_{k=1..m} a(k) = 2*log((5+sqrt(21))/2)/sqrt(21) = 0.683807... . - Amiram Eldar, Oct 11 2022
From Amiram Eldar, Nov 19 2023: (Start)
a(n) = Sum_{d|n} Kronecker(21, d).
Multiplicative with a(p^e) = 1 if Kronecker(21, p) = 0 (p = 3 or 7), a(p^e) = (1+(-1)^e)/2 if Kronecker(21, p) = -1 (p is in A038894), and a(p^e) = e+1 if Kronecker(21, p) = 1 (p is in A038893 \ {3, 7}). (End)

A035195 Coefficients in expansion of Dirichlet series Product_p (1-(Kronecker(m,p)+1)p^(-s)+Kronecker(m,p)p^(-2s))^(-1) for m = 13.

Original entry on oeis.org

1, 0, 2, 1, 0, 0, 0, 0, 3, 0, 0, 2, 1, 0, 0, 1, 2, 0, 0, 0, 0, 0, 2, 0, 1, 0, 4, 0, 2, 0, 0, 0, 0, 0, 0, 3, 0, 0, 2, 0, 0, 0, 2, 0, 0, 0, 0, 2, 1, 0, 4, 1, 2, 0, 0, 0, 0, 0, 0, 0, 2, 0, 0, 1, 0, 0, 0, 2, 4, 0, 0, 0, 0, 0, 2, 0, 0, 0, 2, 0, 5

Offset: 1

N. J. A. Sloane

Coefficients of Dedekind zeta function for the quadratic number field of discriminant 13. See A002324 for formula and Maple code. - N. J. A. Sloane, Mar 22 2022

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

Dedekind zeta functions for imaginary quadratic number fields of discriminants -3, -4, -7, -8, -11, -15, -19, -20 are A002324, A002654, A035182, A002325, A035179, A035175, A035171, A035170, respectively.
Dedekind zeta functions for real quadratic number fields of discriminants 5, 8, 12, 13, 17, 21, 24, 28, 29, 33, 37, 40 are A035187, A035185, A035194, A035195, A035199, A035203, A035188, A035210, A035211, A035215, A035219, A035192, respectively.
Cf. A038883, A038884.

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

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

a(n) = sumdiv(n, d, kronecker(13, d)); \\ Amiram Eldar, Nov 18 2023

Asymptotic mean: Limit_{m->oo} (1/m) * Sum_{k=1..m} a(k) = 2*log((3+sqrt(13))/2)/sqrt(13) = 0.662735... . - Amiram Eldar, Oct 11 2022
From Amiram Eldar, Nov 18 2023: (Start)
a(n) = Sum_{d|n} Kronecker(13, d).
Multiplicative with a(13^e) = 1, a(p^e) = (1+(-1)^e)/2 if Kronecker(13, p) = -1 (p is in A038884), and a(p^e) = e+1 if Kronecker(13, p) = 1 (p is in A038883 \ {13}). (End)

A035199 Coefficients in expansion of Dirichlet series Product_p (1-(Kronecker(m,p)+1)p^(-s)+Kronecker(m,p)p^(-2s))^(-1) for m = 17.

Original entry on oeis.org

1, 2, 0, 3, 0, 0, 0, 4, 1, 0, 0, 0, 2, 0, 0, 5, 1, 2, 2, 0, 0, 0, 0, 0, 1, 4, 0, 0, 0, 0, 0, 6, 0, 2, 0, 3, 0, 4, 0, 0, 0, 0, 2, 0, 0, 0, 2, 0, 1, 2, 0, 6, 2, 0, 0, 0, 0, 0, 2, 0, 0, 0, 0, 7, 0, 0, 2, 3, 0, 0, 0, 4, 0, 0, 0, 6, 0, 0, 0, 0, 1

Offset: 1

N. J. A. Sloane

Coefficients of Dedekind zeta function for the quadratic number field of discriminant 17. See A002324 for formula and Maple code. - N. J. A. Sloane, Mar 22 2022

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

Dedekind zeta functions for imaginary quadratic number fields of discriminants -3, -4, -7, -8, -11, -15, -19, -20 are A002324, A002654, A035182, A002325, A035179, A035175, A035171, A035170, respectively.
Dedekind zeta functions for real quadratic number fields of discriminants 5, 8, 12, 13, 17, 21, 24, 28, 29, 33, 37, 40 are A035187, A035185, A035194, A035195, A035199, A035203, A035188, A035210, A035211, A035215, A035219, A035192, respectively.
Cf. A038889, A038890.

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

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

a(n) = sumdiv(n, d, kronecker(17, d)); \\ Amiram Eldar, Nov 18 2023

Asymptotic mean: Limit_{m->oo} (1/m) * Sum_{k=1..m} a(k) = 2*log(4+sqrt(17))/sqrt(17) = 1.016084... . - Amiram Eldar, Oct 11 2022
From Amiram Eldar, Nov 18 2023: (Start)
a(n) = Sum_{d|n} Kronecker(17, d).
Multiplicative with a(17^e) = 1, a(p^e) = (1+(-1)^e)/2 if Kronecker(17, p) = -1 (p is in A038890), and a(p^e) = e+1 if Kronecker(17, p) = 1 (p is in A038889 \ {17}). (End)

A035192 Coefficients in expansion of Dirichlet series Product_p (1-(Kronecker(m,p)+1)p^(-s)+Kronecker(m,p)p^(-2s))^(-1) for m = 10.

Original entry on oeis.org

1, 1, 2, 1, 1, 2, 0, 1, 3, 1, 0, 2, 2, 0, 2, 1, 0, 3, 0, 1, 0, 0, 0, 2, 1, 2, 4, 0, 0, 2, 2, 1, 0, 0, 0, 3, 2, 0, 4, 1, 2, 0, 2, 0, 3, 0, 0, 2, 1, 1, 0, 2, 2, 4, 0, 0, 0, 0, 0, 2, 0, 2, 0, 1, 2, 0, 2, 0, 0, 0, 2, 3, 0, 2, 2, 0, 0, 4, 2, 1, 5

Offset: 1

N. J. A. Sloane

Coefficients of Dedekind zeta function for the quadratic number field of discriminant 40. See A002324 for formula and Maple code. - N. J. A. Sloane, Mar 22 2022

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

Dedekind zeta functions for imaginary quadratic number fields of discriminants -3, -4, -7, -8, -11, -15, -19, -20 are A002324, A002654, A035182, A002325, A035179, A035175, A035171, A035170, respectively.
Dedekind zeta functions for real quadratic number fields of discriminants 5, 8, 12, 13, 17, 21, 24, 28, 29, 33, 37, 40 are A035187, A035185, A035194, A035195, A035199, A035203, A035188, A035210, A035211, A035215, A035219, A035192, respectively.
Cf. A038880, A097955.

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

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

a(n) = sumdiv(n, d, kronecker(10, d)); \\ Amiram Eldar, Nov 18 2023

From Amiram Eldar, Nov 18 2023: (Start)
a(n) = Sum_{d|n} Kronecker(10, d).
Multiplicative with a(p^e) = 1 if Kronecker(10, p) = 0 (p = 2 or 5), a(p^e) = (1+(-1)^e)/2 if Kronecker(10, p) = -1 (p is in A038880), and a(p^e) = e+1 if Kronecker(10, p) = 1 (p is in A097955).
Asymptotic mean: Limit_{m->oo} (1/m) * Sum_{k=1..m} a(k) = 2*log(sqrt(10)+3)/sqrt(10) = 1.1500865228... . (End)

A035194 Coefficients in expansion of Dirichlet series Product_p (1-(Kronecker(m,p)+1)p^(-s)+Kronecker(m,p)p^(-2s))^(-1) for m = 12.

Original entry on oeis.org

1, 1, 1, 1, 0, 1, 0, 1, 1, 0, 2, 1, 2, 0, 0, 1, 0, 1, 0, 0, 0, 2, 2, 1, 1, 2, 1, 0, 0, 0, 0, 1, 2, 0, 0, 1, 2, 0, 2, 0, 0, 0, 0, 2, 0, 2, 2, 1, 1, 1, 0, 2, 0, 1, 0, 0, 0, 0, 2, 0, 2, 0, 0, 1, 0, 2, 0, 0, 2, 0, 2, 1, 2, 2, 1, 0, 0, 2, 0, 0, 1

Offset: 1

N. J. A. Sloane

Coefficients of Dedekind zeta function for the quadratic number field of discriminant 12. See A002324 for formula and Maple code. - N. J. A. Sloane, Mar 22 2022

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

Dedekind zeta functions for imaginary quadratic number fields of discriminants -3, -4, -7, -8, -11, -15, -19, -20 are A002324, A002654, A035182, A002325, A035179, A035175, A035171, A035170, respectively.
Dedekind zeta functions for real quadratic number fields of discriminants 5, 8, 12, 13, 17, 21, 24, 28, 29, 33, 37, 40 are A035187, A035185, A035194, A035195, A035199, A035203, A035188, A035210, A035211, A035215, A035219, A035192, respectively.
Cf. A003630, A097933, A196530.

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

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

a(n) = sumdiv(n, d, kronecker(12, d)); \\ Amiram Eldar, Nov 18 2023

Asymptotic mean: Limit_{m->oo} (1/m) * Sum_{k=1..m} a(k) = log(2+sqrt(3))/sqrt(3) = 0.760345... (A196530). - Amiram Eldar, Oct 11 2022
From Amiram Eldar, Nov 18 2023: (Start)
a(n) = Sum_{d|n} Kronecker(12, d).
Multiplicative with a(p^e) = 1 if Kronecker(12, p) = 0 (p = 2 or 3), a(p^e) = (1+(-1)^e)/2 if Kronecker(12, p) = -1 (p is in A003630), and a(p^e) = e+1 if Kronecker(12, p) = 1 (p is in A097933). (End)

A035210 Coefficients in expansion of Dirichlet series Product_p (1-(Kronecker(m,p)+1)p^(-s)+Kronecker(m,p)p^(-2s))^(-1) for m = 28.

Original entry on oeis.org

1, 1, 2, 1, 0, 2, 1, 1, 3, 0, 0, 2, 0, 1, 0, 1, 0, 3, 2, 0, 2, 0, 0, 2, 1, 0, 4, 1, 2, 0, 2, 1, 0, 0, 0, 3, 2, 2, 0, 0, 0, 2, 0, 0, 0, 0, 2, 2, 1, 1, 0, 0, 2, 4, 0, 1, 4, 2, 2, 0, 0, 2, 3, 1, 0, 0, 0, 0, 0, 0, 0, 3, 0, 2, 2, 2, 0, 0, 0, 0, 5

Offset: 1

N. J. A. Sloane

Coefficients of Dedekind zeta function for the quadratic number field of discriminant 28. See A002324 for formula and Maple code. - N. J. A. Sloane, Mar 22 2022

Amiram Eldar, Table of n, a(n) for n = 1..10000

Dedekind zeta functions for imaginary quadratic number fields of discriminants -3, -4, -7, -8, -11, -15, -19, -20 are A002324, A002654, A035182, A002325, A035179, A035175, A035171, A035170, respectively.
Dedekind zeta functions for real quadratic number fields of discriminants 5, 8, 12, 13, 17, 21, 24, 28, 29, 33, 37, 40 are A035187, A035185, A035194, A035195, A035199, A035203, A035188, A035210, A035211, A035215, A035219, A035192, respectively.
Cf. A003632, A296934.

a[n_] := DivisorSum[n, KroneckerSymbol[28, #] &]; Array[a, 100] (* Amiram Eldar, Nov 19 2023 *)

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

a(n) = sumdiv(n, d, kronecker(28, d)); \\ Amiram Eldar, Nov 19 2023

From Amiram Eldar, Nov 19 2023: (Start)
a(n) = Sum_{d|n} Kronecker(28, d).
Multiplicative with a(p^e) = 1 if Kronecker(28, p) = 0 (p = 2 or 7), a(p^e) = (1+(-1)^e)/2 if Kronecker(28, p) = -1 (p is in A003632), and a(p^e) = e+1 if Kronecker(28, p) = 1 (p is in A296934).
Asymptotic mean: Limit_{m->oo} (1/m) * Sum_{k=1..m} a(k) = log(3*sqrt(7)+8)/sqrt(7) = 1.046454884756... . (End)

A035211 Coefficients in expansion of Dirichlet series Product_p (1-(Kronecker(m,p)+1)p^(-s)+Kronecker(m,p)p^(-2s))^(-1) for m = 29.

Original entry on oeis.org

1, 0, 0, 1, 2, 0, 2, 0, 1, 0, 0, 0, 2, 0, 0, 1, 0, 0, 0, 2, 0, 0, 2, 0, 3, 0, 0, 2, 1, 0, 0, 0, 0, 0, 4, 1, 0, 0, 0, 0, 0, 0, 0, 0, 2, 0, 0, 0, 3, 0, 0, 2, 2, 0, 0, 0, 0, 0, 2, 0, 0, 0, 2, 1, 4, 0, 2, 0, 0, 0, 2, 0, 0, 0, 0, 0, 0, 0, 0, 2, 1

Offset: 1

N. J. A. Sloane

Coefficients of Dedekind zeta function for the quadratic number field of discriminant 29. See A002324 for formula and Maple code. - N. J. A. Sloane, Mar 22 2022

Amiram Eldar, Table of n, a(n) for n = 1..10000

Dedekind zeta functions for imaginary quadratic number fields of discriminants -3, -4, -7, -8, -11, -15, -19, -20 are A002324, A002654, A035182, A002325, A035179, A035175, A035171, A035170, respectively.
Dedekind zeta functions for real quadratic number fields of discriminants 5, 8, 12, 13, 17, 21, 24, 28, 29, 33, 37, 40 are A035187, A035185, A035194, A035195, A035199, A035203, A035188, A035210, A035211, A035215, A035219, A035192, respectively.
Cf. A038902, A191022.

a[n_] := DivisorSum[n, KroneckerSymbol[29, #] &]; Array[a, 100] (* Amiram Eldar, Nov 19 2023 *)

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

a(n) = sumdiv(n, d, kronecker(29, d)); \\ Amiram Eldar, Nov 19 2023

From Amiram Eldar, Nov 19 2023: (Start)
a(n) = Sum_{d|n} Kronecker(29, d).
Multiplicative with a(29^e) = 1, a(p^e) = (1+(-1)^e)/2 if Kronecker(29, p) = -1 (p is in A038902), and a(p^e) = e+1 if Kronecker(29, p) = 1 (p is in A191022).
Asymptotic mean: Limit_{m->oo} (1/m) * Sum_{k=1..m} a(k) = 2*log((sqrt(29)+5)/2)/sqrt(29) = 0.611766289562... . (End)

A035219 Coefficients in expansion of Dirichlet series Product_p (1-(Kronecker(m,p)+1)p^(-s)+Kronecker(m,p)p^(-2s))^(-1) for m = 37.

Original entry on oeis.org

1, 0, 2, 1, 0, 0, 2, 0, 3, 0, 2, 2, 0, 0, 0, 1, 0, 0, 0, 0, 4, 0, 0, 0, 1, 0, 4, 2, 0, 0, 0, 0, 4, 0, 0, 3, 1, 0, 0, 0, 2, 0, 0, 2, 0, 0, 2, 2, 3, 0, 0, 0, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 6, 1, 0, 0, 2, 0, 0, 0, 2, 0, 2, 0, 2, 0, 4, 0, 0, 0, 5

Offset: 1

N. J. A. Sloane

Coefficients of Dedekind zeta function for the quadratic number field of discriminant 37. See A002324 for formula and Maple code. - N. J. A. Sloane, Mar 22 2022

Amiram Eldar, Table of n, a(n) for n = 1..10000

Dedekind zeta functions for imaginary quadratic number fields of discriminants -3, -4, -7, -8, -11, -15, -19, -20 are A002324, A002654, A035182, A002325, A035179, A035175, A035171, A035170, respectively.
Dedekind zeta functions for real quadratic number fields of discriminants 5, 8, 12, 13, 17, 21, 24, 28, 29, 33, 37, 40 are A035187, A035185, A035194, A035195, A035199, A035203, A035188, A035210, A035211, A035215, A035219, A035192, respectively.
Cf. A038914, A191027.

a[n_] := DivisorSum[n, KroneckerSymbol[37, #] &]; Array[a, 100] (* Amiram Eldar, Nov 20 2023 *)

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

a(n) = sumdiv(n, d, kronecker(37, d)); \\ Amiram Eldar, Nov 20 2023

From Amiram Eldar, Nov 20 2023: (Start)
a(n) = Sum_{d|n} Kronecker(37, d).
Multiplicative with a(37^e) = 1, a(p^e) = (1+(-1)^e)/2 if Kronecker(37, p) = -1 (p is in A038914), and a(p^e) = e+1 if Kronecker(37, p) = 1 (p is in A191027).
Asymptotic mean: Limit_{m->oo} (1/m) * Sum_{k=1..m} a(k) = 2*log(sqrt(37)+6)/sqrt(37) = 0.819292168725... . (End)

A035215 Coefficients in expansion of Dirichlet series Product_p (1-(Kronecker(m,p)+1)p^(-s)+Kronecker(m,p)p^(-2s))^(-1) for m = 33.

Original entry on oeis.org

1, 2, 1, 3, 0, 2, 0, 4, 1, 0, 1, 3, 0, 0, 0, 5, 2, 2, 0, 0, 0, 2, 0, 4, 1, 0, 1, 0, 2, 0, 2, 6, 1, 4, 0, 3, 2, 0, 0, 0, 2, 0, 0, 3, 0, 0, 0, 5, 1, 2, 2, 0, 0, 2, 0, 0, 0, 4, 0, 0, 0, 4, 0, 7, 0, 2, 2, 6, 0, 0, 0, 4, 0, 4, 1, 0, 0, 0, 0, 0, 1

Offset: 1

N. J. A. Sloane

Coefficients of Dedekind zeta function for the quadratic number field of discriminant 33. See A002324 for formula and Maple code. - N. J. A. Sloane, Mar 22 2022

Amiram Eldar, Table of n, a(n) for n = 1..10000

Dedekind zeta functions for imaginary quadratic number fields of discriminants -3, -4, -7, -8, -11, -15, -19, -20 are A002324, A002654, A035182, A002325, A035179, A035175, A035171, A035170, respectively.
Dedekind zeta functions for real quadratic number fields of discriminants 5, 8, 12, 13, 17, 21, 24, 28, 29, 33, 37, 40 are A035187, A035185, A035194, A035195, A035199, A035203, A035188, A035210, A035211, A035215, A035219, A035192, respectively.
Cf. A038907, A038908.

a[n_] := DivisorSum[n, KroneckerSymbol[33, #] &]; Array[a, 100] (* Amiram Eldar, Nov 19 2023 *)

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

a(n) = sumdiv(n, d, kronecker(33, d)); \\ Amiram Eldar, Nov 19 2023

From Amiram Eldar, Nov 19 2023: (Start)
a(n) = Sum_{d|n} Kronecker(33, d).
Multiplicative with a(p^e) = 1 if Kronecker(33, p) = 0 (p = 3 or 11), a(p^e) = (1+(-1)^e)/2 if Kronecker(33, p) = -1 (p is in A038908), and a(p^e) = e+1 if Kronecker(33, p) = 1 (p is in A038907 \ {3, 11}).
Asymptotic mean: Limit_{m->oo} (1/m) * Sum_{k=1..m} a(k) = 2*log(4*sqrt(33)+23)/sqrt(33) = 1.332797188186... . (End)

A322796 a(n) = Kronecker symbol (6/n).

Original entry on oeis.org

0, 1, 0, 0, 0, 1, 0, -1, 0, 0, 0, -1, 0, -1, 0, 0, 0, -1, 0, 1, 0, 0, 0, 1, 0, 1, 0, 0, 0, 1, 0, -1, 0, 0, 0, -1, 0, -1, 0, 0, 0, -1, 0, 1, 0, 0, 0, 1, 0, 1, 0, 0, 0, 1, 0, -1, 0, 0, 0, -1, 0, -1, 0, 0, 0, -1, 0, 1, 0, 0, 0, 1, 0, 1, 0, 0, 0, 1, 0, -1, 0, 0, 0, -1, 0

Offset: 0

Jianing Song, Dec 26 2018

Period 24: repeat [0, 1, 0, 0, 0, 1, 0, -1, 0, 0, 0, -1, 0, -1, 0, 0, 0, -1, 0, 1, 0, 0, 0, 1].
Also a(n) = Kronecker symbol (24/n).
This sequence is one of the seven non-principal real Dirichlet characters modulo 24. The other six are Jacobi or Kronecker symbols {(-6/n)} (or {(n/6)}, {(-24/n)}, {(n/24)}, A109017), {(-12/n)} (or {(n/12)}, A134667), {(12/n)} (A110161), {(-18/n)} (or {(-72/n)}), {(18/n)} (or {(72/n)}, {(n/72)}) and {(-36/n)}. These sequences all become the same after taking absolute values.

Antti Karttunen, Table of n, a(n) for n = 0..65543
Eric Weisstein's World of Mathematics, Kronecker Symbol (contains this sequence)
Index entries for linear recurrences with constant coefficients, signature (0,0,0,1,0,0,0,-1).

Cf. A035188 (inverse Moebius transform).

Kronecker symbols {(d/n)} where d is a fundamental discriminant with |d| <= 24: A109017 (d=-24), A011586 (d=-23), A289741 (d=-20), A011585 (d=-19), A316569 (d=-15), A011582 (d=-11), A188510 (d=-8), A175629 (d=-7), A101455 (d=-4), A102283 (d=-3), A080891 (d=5), A091337 (d=8), A110161 (d=12), A011583 (d=13), A011584 (d=17), A322829 (d=21), this sequence (d=24).

[KroneckerSymbol(6, n): n in [0..100]]; // Vincenzo Librandi, Jan 01 2019

Array[KroneckerSymbol[6, #] &, 105, 0] (* Michael De Vlieger, Dec 31 2018 *)
Table[KroneckerSymbol[6, n], {n, 0, 100}] (* Vincenzo Librandi, Jan 01 2019 *)

a(n) = kronecker(6, n); \\ --- Argument order corrected by Antti Karttunen, Sep 27 2019

a(n) = 1 for n == 1, 5, 19, 23 (mod 24); -1 for n == 7, 11, 13, 17 (mod 24); 0 for n that are not coprime with 21.
Completely multiplicative with a(p) = a(p mod 24) for primes p.
a(n) = A091337(n)*A102283(n).
a(n) = A109017(n+12) = A109017(n-12).
a(n) = a(-n) = a(n+24) for all n in Z.

Definition corrected by Antti Karttunen, Sep 28 2019

cp's OEIS Frontend

A035203 Coefficients in expansion of Dirichlet series Product_p (1-(Kronecker(m,p)+1)*p^(-s)+Kronecker(m,p)*p^(-2s))^(-1) for m = 21.

Views

Author

Keywords

Comments

Links

Crossrefs

Programs

Mathematica

PARI

PARI

Formula

A035195 Coefficients in expansion of Dirichlet series Product_p (1-(Kronecker(m,p)+1)*p^(-s)+Kronecker(m,p)*p^(-2s))^(-1) for m = 13.

Views

Author

Keywords

Comments

Links

Crossrefs

Programs

Mathematica

PARI

PARI

Formula

A035199 Coefficients in expansion of Dirichlet series Product_p (1-(Kronecker(m,p)+1)*p^(-s)+Kronecker(m,p)*p^(-2s))^(-1) for m = 17.

Views

Author

Keywords

Comments

Links

Crossrefs

Programs

Mathematica

PARI

PARI

Formula

A035192 Coefficients in expansion of Dirichlet series Product_p (1-(Kronecker(m,p)+1)*p^(-s)+Kronecker(m,p)*p^(-2s))^(-1) for m = 10.

Views

Author

Keywords

Comments

Links

Crossrefs

Programs

Mathematica

PARI

PARI

Formula

A035194 Coefficients in expansion of Dirichlet series Product_p (1-(Kronecker(m,p)+1)*p^(-s)+Kronecker(m,p)*p^(-2s))^(-1) for m = 12.

Views

Author

Keywords

Comments

Links

Crossrefs

Programs

Mathematica

PARI

PARI

Formula

A035210 Coefficients in expansion of Dirichlet series Product_p (1-(Kronecker(m,p)+1)*p^(-s)+Kronecker(m,p)*p^(-2s))^(-1) for m = 28.

Views

Author

Keywords

Comments

Links

Crossrefs

Programs

Mathematica

PARI

PARI

Formula

A035211 Coefficients in expansion of Dirichlet series Product_p (1-(Kronecker(m,p)+1)*p^(-s)+Kronecker(m,p)*p^(-2s))^(-1) for m = 29.

Views

Author

Keywords

Comments

Links

Crossrefs

A035203 Coefficients in expansion of Dirichlet series Product_p (1-(Kronecker(m,p)+1)p^(-s)+Kronecker(m,p)p^(-2s))^(-1) for m = 21.

A035195 Coefficients in expansion of Dirichlet series Product_p (1-(Kronecker(m,p)+1)p^(-s)+Kronecker(m,p)p^(-2s))^(-1) for m = 13.

A035199 Coefficients in expansion of Dirichlet series Product_p (1-(Kronecker(m,p)+1)p^(-s)+Kronecker(m,p)p^(-2s))^(-1) for m = 17.

A035192 Coefficients in expansion of Dirichlet series Product_p (1-(Kronecker(m,p)+1)p^(-s)+Kronecker(m,p)p^(-2s))^(-1) for m = 10.

A035194 Coefficients in expansion of Dirichlet series Product_p (1-(Kronecker(m,p)+1)p^(-s)+Kronecker(m,p)p^(-2s))^(-1) for m = 12.

A035210 Coefficients in expansion of Dirichlet series Product_p (1-(Kronecker(m,p)+1)p^(-s)+Kronecker(m,p)p^(-2s))^(-1) for m = 28.

A035211 Coefficients in expansion of Dirichlet series Product_p (1-(Kronecker(m,p)+1)p^(-s)+Kronecker(m,p)p^(-2s))^(-1) for m = 29.

A035219 Coefficients in expansion of Dirichlet series Product_p (1-(Kronecker(m,p)+1)p^(-s)+Kronecker(m,p)p^(-2s))^(-1) for m = 37.

A035215 Coefficients in expansion of Dirichlet series Product_p (1-(Kronecker(m,p)+1)p^(-s)+Kronecker(m,p)p^(-2s))^(-1) for m = 33.