A023874 -id:A023874 - cp's OEIS frontend

A013665 Decimal expansion of zeta(7).

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

Offset: 1

N. J. A. Sloane

From Dimitris Valianatos, Apr 29 2020: (Start)
Let p_n = Product_{k >= 1, 4*k-1 is prime} (((4*k - 1)^n + 1) / ((4*k - 1)^n - 1)).
Then (2^(n + 1) / (2^n - 1)) * Sum_{k >= 1} 1 / (4*k - 3)^n = ((p_n + 1) / p_n) * Sum_{k >= 1} 1 / k^n = ((p_n + 1) / p_n) * zeta(n), n >= 3 odd number.
For n = 7, p_7 = 1.00091744947834007403796003463414...
The product (256 / 127) * Sum_{k >= 1} 1 / (4*k - 3)^7 = 2.01577429320860871987548541116538... is equal to the product ((p_7 + 1) / p_7) * Sum_{k >= 1} 1 / k^7 = 1.9990833914636834116748... * zeta(7) = 2.01577429320860871987548541116538... (End)

			1.0083492773819228268397975498497967595998635605652387064172831365716014...

M. Abramowitz and I. A. Stegun, eds., Handbook of Mathematical Functions, National Bureau of Standards Applied Math. Series 55, 1964 (and various reprintings), p. 811.
John H. Conway and Richard K. Guy, The Book of Numbers, New York: Springer-Verlag, 1996. See p. 262.
Steven R. Finch, Mathematical Constants, Encyclopedia of Mathematics and its Applications, vol. 94, Cambridge University Press, 2003, Section 1.6.3, p. 43.

Jakob Ablinger, Proving two conjectural series for zeta(7) and discovering more series for zeta(7), arXiv:1908.06631 [math.CO], 2019.
M. Abramowitz and I. A. Stegun, eds., Handbook of Mathematical Functions, National Bureau of Standards, Applied Math. Series 55, Tenth Printing, 1972 [alternative scanned copy].
J. Borwein and D. Bradley, Empirically determined Apéry-like formulas for zeta(4n+3), arXiv:math/0505124 [math.CA], 2005.
Michael J. Dancs and Tian-Xiao He, An Euler-type formula for zeta(2k+1), Journal of Number Theory, Volume 118, Issue 2, June 2006, Pages 192-199.
Simon Plouffe, Plouffe's Inverter, Zeta(7) to 50000 digits.
Simon Plouffe, Zeta(7) to 512 places:sum(1/n^7, n=1..infinity).

Cf. A013661, A002117, A013662, A013663, A013664, A013666, A013667, A013668, A013669, A013670, A013671, A013672, A013673, A013674, A013675, A013676, A013677, A013678, A293904.

Cf. A023874, A023875, A248884.

RealDigits[Zeta[7],10,120][[1]] (* Harvey P. Dale, Oct 23 2012 *)

PARI
```
zeta(7) \\ Michel Marcus, Apr 17 2016
```

zeta(7) = Sum_{n >= 1} (A010052(n)/n^(7/2)) = Sum_{n >= 1} ( (floor(sqrt(n))-floor(sqrt(n-1)))/n^(7/2) ). - Mikael Aaltonen, Feb 22 2015
zeta(7) = Product_{k>=1} 1/(1 - 1/prime(k)^7). - Vaclav Kotesovec, Apr 30 2020
From Artur Jasinski, Jun 27 2020: (Start)
zeta(7) = (-1/840)*Integral_{x=0..1} log(1-x^6)^7/x^7.
zeta(7) = (1/720)*Integral_{x=0..oo} x^6/(exp(x)-1).
zeta(7) = (4/2835)*Integral_{x=0..oo} x^6/(exp(x)+1).
zeta(7) = (1/(182880*Zeta(1/2)^7))*(-61*Pi^7*zeta(1/2)^7 + 2880* zeta'(1/2)^7 - 10080*zeta(1/2)*zeta'(1/2)^5*zeta''(1/2) + 10080* zeta(1/2)^2*zeta'(1/2)^3*zeta''(1/2)^2 - 2520*zeta(1/2)^3*zeta'(1/2)* zeta''(1/2)^3 + 3360*zeta(1/2)^2*zeta'(1/2)^4*zeta'''(1/2) - 5040 zeta(1/2)^3*zeta'(1/2)^2*zeta''(1/2)*zeta'''(1/2) + 840*zeta(1/2)^4* zeta''(1/2)^2*zeta'''(1/2) + 560*zeta(1/2)^4*zeta'(1/2)*zeta'''(1/2)^3  - 840*zeta(1/2)^3*zeta'(1/2)^3*zeta''''(1/2) + 840*zeta(1/2)^4*zeta'(1/2)* zeta''(1/2)*zeta''''(1/2) - 140*zeta(1/2)^5*zeta'''(1/2)*zeta''''(1/2) + 168*zeta(1/2)^4*zeta'(1/2)^2*zeta'''''(1/2) - 84*zeta(1/2)^5*zeta''(1/2)* zeta'''''(1/2) - 28*zeta(1/2)^5*zeta'(1/2)*zeta''''''(1/2) + 4* zeta(1/2)^6*zeta'''''''(1/2)). (End)
Equals 19*Pi^7/56700 - 2*Sum_{k>=1} 1/(k^7*(exp(2*Pi*k) - 1)) [Grosswald] (see Finch). - Stefano Spezia, Nov 01 2024
From Peter Bala, Apr 27 2025: (Start)
zeta(7) = 1/7! * Integral_{x >= 0} x^7 * exp(x)/(exp(x) - 1)^2 dx = 2^6/(2^6 - 1) * 1/7! * Integral_{x >= 0} x^7 * exp(x)/(exp(x) + 1)^2 dx.
zeta(7) = 1/8! * Integral_{x >= 0} x^8 * exp(x)*(exp(x) + 1) /(exp(x) - 1)^3 dx = 1/ (2*3*7*15*63) * Integral_{x >= 0} x^8 * exp(x)*(exp(x) - 1)/(exp(x) + 1)^3 dx. (End)

A144048 Square array A(n,k), n>=0, k>=0, read by antidiagonals, where column k is Euler transform of (j->j^k).

Original entry on oeis.org

1, 1, 1, 1, 1, 2, 1, 1, 3, 3, 1, 1, 5, 6, 5, 1, 1, 9, 14, 13, 7, 1, 1, 17, 36, 40, 24, 11, 1, 1, 33, 98, 136, 101, 48, 15, 1, 1, 65, 276, 490, 477, 266, 86, 22, 1, 1, 129, 794, 1828, 2411, 1703, 649, 160, 30, 1, 1, 257, 2316, 6970, 12729, 11940, 5746, 1593, 282, 42, 1, 1, 513

Offset: 0

Alois P. Heinz, Sep 08 2008

In general, column k > 0 is asymptotic to (Gamma(k+2)*Zeta(k+2))^((1-2*Zeta(-k)) /(2*k+4)) * exp((k+2)/(k+1) * (Gamma(k+2)*Zeta(k+2))^(1/(k+2)) * n^((k+1)/(k+2)) + Zeta'(-k)) / (sqrt(2*Pi*(k+2)) * n^((k+3-2*Zeta(-k))/(2*k+4))). - Vaclav Kotesovec, Mar 01 2015

			Square array begins:
  1,  1,   1,   1,    1,     1, ...
  1,  1,   1,   1,    1,     1, ...
  2,  3,   5,   9,   17,    33, ...
  3,  6,  14,  36,   98,   276, ...
  5, 13,  40, 136,  490,  1828, ...
  7, 24, 101, 477, 2411, 12729, ...

Alois P. Heinz, Antidiagonals = 0..99, flattened
Vaclav Kotesovec, A method of finding the asymptotics of q-series based on the convolution of generating functions, arXiv:1509.08708 [math.CO], Sep 30 2015, p. 21.
N. J. A. Sloane, Transforms

Columns k=0-9 give: A000041, A000219, A023871, A023872, A023873, A023874, A023875, A023876, A023877, A023878.
Rows give: 0-1: A000012, 2: A000051, A094373, 3: A001550, 4: A283456, 5: A283457.
Main diagonal gives A252782.
Cf. A283272.

with(numtheory): etr:= proc(p) local b; b:= proc(n) option remember; `if`(n=0,1, add(add(d*p(d), d=divisors(j)) *b(n-j), j=1..n)/n) end end: A:= (n,k)-> etr(j->j^k)(n); seq(seq(A(n,d-n), n=0..d), d=0..13);

etr[p_] := Module[{ b}, b[n_] := b[n] = If[n == 0, 1, Sum[Sum[d*p[d], {d, Divisors[j]}]*b[n - j], {j, 1, n}]/n]; b]; A[n_, k_] := etr[Function[j, j^k]][n]; Table[Table[A[n, d - n], {n, 0, d}], {d, 0, 13}] // Flatten (* Jean-François Alcover, Dec 27 2013, translated from Maple *)

G.f. of column k: Product_{j>=1} 1/(1-x^j)^(j^k).

A259070 Decimal expansion of zeta'(-5) (the derivative of Riemann's zeta function at -5) (negated).

Original entry on oeis.org

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

Offset: 0

Jean-François Alcover, Jun 18 2015

			-0.000572985980198635204990994148833874513253987291199521217820791880997735...

Steven R. Finch, Mathematical Constants, Cambridge University Press, 2003, Section 2.15.1 Generalized Glaisher constants, p. 136-137.

G. C. Greubel, Table of n, a(n) for n = 0..10000
J. B. Rosser, L. Schoenfeld, Approximate formulas for some functions of prime numbers, Ill. J. Math. 6 (1) (1962) 64-94, Table IV
Eric Weisstein's MathWorld, Riemann Zeta Function.
Wikipedia, Riemann Zeta Function
Index entries for constants related to zeta

Cf. A000417, A000428, A023874, A260404.

Join[{0, 0, 0}, RealDigits[Zeta'[-5], 10, 103] // First]

zeta'(-n) = (BernoulliB(n+1)*HarmonicNumber(n))/(n+1) - log(A(n)), where A(n) is the n-th Bendersky constant, that is the n-th generalized Glaisher constant.
zeta'(-5) = 137/15120 - log(A(5)), where A(5) is A243265.
Equals 137/15120 - (gamma + log(2*Pi))/252 + 15*Zeta'(6) / (4*Pi^6), where gamma is the Euler-Mascheroni constant A001620. - Vaclav Kotesovec, Jul 25 2015

A343285 Dirichlet g.f.: Product_{k>=2} 1 / (1 - k^(-s))^(k^5).

Original entry on oeis.org

1, 32, 243, 1552, 3125, 15552, 16807, 71520, 88695, 200000, 161051, 874800, 371293, 1075648, 1518750, 3214984, 1419857, 6617376, 2476099, 11250000, 8168202, 10307264, 6436343, 45372960, 14650000, 23762752, 31118904, 60505200, 20511149, 121500000, 28629151, 141263008, 78270786, 90870848

Offset: 1

Ilya Gutkovskiy, Apr 10 2021

nonn

Cf. A000584, A001055, A023874, A050367, A329125, A343283, A343284, A343286, A343287, A343288, A343289.

A283336 Expansion of exp( Sum_{n>=1} -sigma_6(n)*x^n/n ) in powers of x.

Original entry on oeis.org

1, -1, -32, -211, -285, 5179, 44784, 162062, -125122, -5187417, -32587255, -95706881, 122837972, 3039216222, 17745876032, 52825817007, -24340390929, -1256623249600, -7805634068163, -26364952524572, -20649978457115, 368666542515083, 2777231006764690

Offset: 0

Seiichi Manyama, Mar 05 2017

sign

Seiichi Manyama, Table of n, a(n) for n = 0..1000

Column k=5 of A283272.
Cf. A023874 (exp( Sum_{n>=1} sigma_6(n)*x^n/n )).
Cf. exp( Sum_{n>=1} -sigma_k(n)*x^n/n ): A010815 (k=1), A073592 (k=2), A283263 (k=3), A283264 (k=4), A283271 (k=5), this sequence (k=6), A283337 (k=7), A283338 (k=8), A283339 (k=9), A283340 (k=10).

a[n_] := If[n<1, 1,-(1/n) * Sum[DivisorSigma[6, k] a[n - k], {k, n}]]; Table[a[n], {n, 0, 22}] (* Indranil Ghosh, Mar 16 2017 *)

a(n) = if(n<1, 1, -(1/n) * sum(k=1, n, sigma(k, 6) * a(n - k)));
for(n=0, 22, print1(a(n), ", ")) \\ Indranil Ghosh, Mar 16 2017

G.f.: Product_{n>=1} (1 - x^n)^(n^5).

a(n) = -(1/n)*Sum_{k=1..n} sigma_6(k)*a(n-k).

cp's OEIS Frontend

A013665 Decimal expansion of zeta(7).

Views

Author

Keywords

Comments

Examples

References

Links

Crossrefs

Programs

Mathematica

PARI

Formula

A144048 Square array A(n,k), n>=0, k>=0, read by antidiagonals, where column k is Euler transform of (j->j^k).

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Maple

Mathematica

Formula

A259070 Decimal expansion of zeta'(-5) (the derivative of Riemann's zeta function at -5) (negated).

Views

Author

Keywords

Examples

References

Links

Crossrefs

Programs

Mathematica

Formula

A343285 Dirichlet g.f.: Product_{k>=2} 1 / (1 - k^(-s))^(k^5).

Views

Author

Keywords

Crossrefs

A283336 Expansion of exp( Sum_{n>=1} -sigma_6(n)*x^n/n ) in powers of x.

Views

Author

Keywords

Links

Crossrefs

Programs

Mathematica

PARI

Formula