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.

A059538 Beatty sequence for zeta(3)/(zeta(3)-1).

Original entry on oeis.org

5, 11, 17, 23, 29, 35, 41, 47, 53, 59, 65, 71, 77, 83, 89, 95, 101, 107, 113, 118, 124, 130, 136, 142, 148, 154, 160, 166, 172, 178, 184, 190, 196, 202, 208, 214, 220, 226, 232, 237, 243, 249, 255, 261, 267, 273, 279, 285, 291, 297, 303, 309, 315, 321, 327
Offset: 1

Views

Author

Mitch Harris, Jan 22 2001

Keywords

Crossrefs

Cf. A002117. Beatty complement is A059537.

Programs

  • Mathematica
    Floor[Range[100]*(1 + 1/(Zeta[3] - 1))] (* Paolo Xausa, Jul 08 2024 *)
  • PARI
    { default(realprecision, 100); b=zeta(3)/(zeta(3) - 1); for (n = 1, 2000, write("b059538.txt", n, " ", floor(n*b)); ) } \\ Harry J. Smith, Jun 27 2009

Formula

a(n) = floor(n*zeta(3)/(zeta(3)-1)). - Michel Marcus, Jan 05 2015

A372767 Decimal expansion of Sum_{k >= 1} floor(k*zeta(3))/2^k.

Original entry on oeis.org

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

Views

Author

Paolo Xausa, May 12 2024

Keywords

Examples

			2.0645161290322580645161290322596931321914240243724629234896...
		

Crossrefs

Programs

  • Mathematica
    First[RealDigits[Sum[Floor[k*Zeta[3]]/2^k, {k, 350}], 10, 100]]

Formula

Equals Sum_{k >= 1} A059537(k)/A000079(k).
Approximately 64/31, correct to 30 digits: see Example 4.1 in Borwein and Borwein (1992), p. 634.
Showing 1-2 of 2 results.