A035210 -id:A035210 - 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)

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

Original entry on oeis.org

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

Offset: 1

N. J. A. Sloane

Coefficients of Dedekind zeta function for the quadratic number field of discriminant 24. 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. A038877, A097934.

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

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

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

From Amiram Eldar, Oct 17 2022: (Start)
a(n) = Sum_{d|n} Kronecker(6, d).
Asymptotic mean: Limit_{m->oo} (1/m) * Sum_{k=1..m} a(k) = log(5+2*sqrt(6)) / sqrt(6) = 0.935881... . (End)
Multiplicative with a(p^e) = 1 if Kronecker(6, p) = 0 (p = 2 or 3), a(p^e) = (1+(-1)^e)/2 if Kronecker(6, p) = -1 (p is in A038877), and a(p^e) = e+1 if Kronecker(6, p) = 1 (p is in A097934). - Amiram Eldar, Nov 20 2023

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)

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)

A370411 Square array T(n, k) = denominator( zeta_r(2n) sqrt(A003658(k + 2)) / Pi^(4*n) ), read by antidiagonals, where zeta_r is the Dedekind zeta-function over r and r is the real quadratic field with discriminant A003658(k + 2).

Original entry on oeis.org

1, 75, 1, 16875, 24, 1, 221484375, 34560, 18, 1, 116279296875, 116121600, 58320, 39, 1, 12950606689453125, 780337152000, 440899200, 296595, 51, 1, 4861333986053466796875, 8899589151129600, 6666395904000, 68420017575, 663255, 63, 1, 677114376628875732421875

Offset: 0

Thomas Scheuerle, Feb 22 2024

			The array begins:
           1,            1,             1,              1,                 1
          75,           24,            18,             39,                51
       16875,        34560,         58320,         296595,            663255
   221484375,    116121600,     440899200,    68420017575,       20126472975
116279296875, 780337152000, 6666395904000, 93393323989875, 10382542981248375

Index entries for zeta function.

Cf. A370412 (numerators).
Cf. A003658, A080891, A097916, A097917, A230375, A370413.
Cf. A000191, A000411, A000464, A064072, A064075.
Cf. A002432 (denominators zeta(2*n)/Pi^(2*n)).
Cf. A046988 (numerators zeta(2*n)/Pi^(2*n)).
Coefficients of 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.

\p 700
row(n) = {v=[]; for(k=2, 30, if(isfundamental(k), v=concat(v, denominator(bestappr(sqrt(k)*lfun(x^2-(k%2)*x-floor(k/4), 2*n)/Pi^(4*n)))))); v}
z(n,d) = if(n == 0, 0,(1/(-2*n))*bernfrac(2*n)*d^(2*n-1)*sum(k=1,d-1, kronecker(d, k)*subst(bernpol(2*n),x,k/d)*(1/(-2*n))))
row(n) = {v=[]; for(k=2, 100, if(isfundamental(k), v=concat(v, denominator((2^(n*4)*n^2*z(n,k))/((2*n)!^2 * (k^(2*n-1))))))); v} \\ more accuracy here

# Only suitable for small n and k
def T(n, k):
    discs = [fundamental_discriminant(i) for i in range(1, 4*k+10)]
    D = sorted(list(set(discs)))[k+1]
    zetaK = QuadraticField(D).zeta_function(1000)
    val = (zetaK(2*n)*sqrt(D)/(pi^(4*n))).n(1000).nearby_rational(2^-900)
    return val.denominator() # Robin Visser, Mar 19 2024

T(n, k) = denominator( 2^(n*4) * n^2 * zeta_r(1 - 2*n) /((2*n)!^2 * A003658(k + 2)^(2*n - 1)) ), where zeta_r is the Dedekind zeta-function over r and r is the real quadratic field with discriminant A003658(k + 2).
T(n, 0) = denominator((5^(-2*n)*(zeta(2*n, 1/5) - zeta(2*n, 2/5) - zeta(2*n, 3/5) + zeta(2*n, 4/5) ))*zeta(2*n)*sqrt(5)*Pi^(-4*n)). A sum of Hurwitz zeta functions with signs according A080891.
T(n, 1) = denominator( 2^(n*4) * n^2 * zeta(1 - 2*n) * (-1)^n * A000464(n+1) /((2*n)!^2 * 8^(2*n - 1)) ).
T(n, 2) = denominator( 2^(n*4) * n^2 * zeta(1 - 2*n) * (-1)^n * A000191(n+1) /((2*n)!^2 * 12^(2*n - 1)) ).
T(n, 3) = denominator((13^(-2*n)*(zeta(2*n, 1/13) - zeta(2*n, 2/13) + zeta(2*n, 3/13) + zeta(2*n, 4/13) - zeta(2*n, 5/13) - zeta(2*n, 6/13) - zeta(2*n, 7/13) -  zeta(2*n, 8/13) + zeta(2*n, 9/13) + zeta(2*n, 10/13) - zeta(2*n, 11/13) + zeta(2*n, 12/13) ))*zeta(2*n)*sqrt(13)*Pi^(-4*n)). A sum of Hurwitz zeta functions with signs according the Dirichlet character X13(12,.).
T(n, 6) = denominator( 2^(n*4) * n^2 * zeta(1 - 2*n) * (-1)^n * A000411(n+1) /((2*n)!^2 * 24^(2*n - 1)) ).
T(n, 7) = denominator( 2^(n*4) * n^2 * zeta(1 - 2*n) * (-1)^n * A064072(n+1) /((2*n)!^2 * 28^(2*n - 1)) ).
T(n, 11) = denominator( 2^(n*4) * n^2 * zeta(1 - 2*n) * (-1)^n * A064075(n+1) /((2*n)!^2 * 40^(2*n - 1)) ).
T(n, k) = denominator( 2^(n*4) * n^2 * zeta(1 - 2*n) * (-1)^n * d(A003658(k+2)/4, n+1) /((2*n)!^2 * 40^(2*n - 1)) ), for all k where A003658(k+2) is a multiple of four (The discriminant of the quadratic field is from 4*A230375). d() are the generalized tangent numbers.
T(0, k) = 1, because for a real quadratic number field the discriminant D is positive, hence the Kronecker symbol (D/-1) = 1. This means the associated Dirichlet L-function will be zero at s = 0 inside the expression zeta_r(s) = zeta(s)*L(s, x).

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

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

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

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.

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

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.

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.

A370411 Square array T(n, k) = denominator( zeta_r(2n) sqrt(A003658(k + 2)) / Pi^(4*n) ), read by antidiagonals, where zeta_r is the Dedekind zeta-function over r and r is the real quadratic field with discriminant A003658(k + 2).