cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

Showing 1-2 of 2 results.

A046988 Numerators of zeta(2*n)/Pi^(2*n).

Original entry on oeis.org

-1, 1, 1, 1, 1, 1, 691, 2, 3617, 43867, 174611, 155366, 236364091, 1315862, 6785560294, 6892673020804, 7709321041217, 151628697551, 26315271553053477373, 308420411983322, 261082718496449122051, 3040195287836141605382, 5060594468963822588186
Offset: 0

Views

Author

Keywords

Comments

Equivalently, numerator of (-1)^(n+1)*2^(2*n-1)*Bernoulli(2*n)/(2*n)!. - Lekraj Beedassy, Jun 26 2003
An old name erroneously included "Numerators of Taylor series expansion of log(x/sin(x))"; that is now submitted as a distinct sequence A283301. - Vladimir Reshetnikov, Mar 04 2017

Examples

			Numerator(zeta(0)/Pi^0) = -1. - _Artur Jasinski_, Mar 11 2010
		

References

  • L. V. Ahlfors, Complex Analysis, McGraw-Hill, 1979, p. 205
  • T. J. I'a. Bromwich, Introduction to the Theory of Infinite Series, Macmillan, 2nd. ed. 1949, p. 222, series for log(H(x)/x).
  • L. Comtet, Advanced Combinatorics, Reidel, 1974, p. 88.
  • CRC Standard Mathematical Tables and Formulae, 30th ed. 1996, p. 42.
  • A. Fletcher, J. C. P. Miller, L. Rosenhead and L. J. Comrie, An Index of Mathematical Tables. Vols. 1 and 2, 2nd ed., Blackwell, Oxford and Addison-Wesley, Reading, MA, 1962, Vol. 1, p. 84.

Crossrefs

Cf. A002432 (denominators), A283301, A266214.

Programs

  • Maple
    seq(numer(Zeta(2*n)/Pi^(2*n)),n=1..24); # Martin Renner, Sep 07 2016
  • Mathematica
    Table[Numerator[Zeta[2 n]/Pi^(2 n)], {n, 0, 30}] (* Artur Jasinski, Mar 11 2010 *)

A272477 Numbers n that are coprime to the numerator of zeta(2*n)/(Pi^(2*n)).

Original entry on oeis.org

1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 15, 16, 17, 18, 19, 20, 21, 23, 24, 25, 27, 29, 31, 32, 33, 34, 35, 36, 37, 39, 40, 41, 43, 45, 47, 48, 49, 51, 53, 55, 57, 59, 61, 63, 64, 65, 66, 67, 68, 69, 71, 72, 73, 75, 77, 79, 80, 81, 83, 85, 87, 89, 91
Offset: 1

Views

Author

Vincenzo Librandi, May 03 2016

Keywords

Comments

Complement of A266214.

Crossrefs

Cf. A266214.

Programs

  • Mathematica
    Select[Range@200, CoprimeQ[#, Numerator[Zeta[2 #]/Pi^(2 #)]] &]
Showing 1-2 of 2 results.