A059537 Beatty sequence for zeta(3).
1, 2, 3, 4, 6, 7, 8, 9, 10, 12, 13, 14, 15, 16, 18, 19, 20, 21, 22, 24, 25, 26, 27, 28, 30, 31, 32, 33, 34, 36, 37, 38, 39, 40, 42, 43, 44, 45, 46, 48, 49, 50, 51, 52, 54, 55, 56, 57, 58, 60, 61, 62, 63, 64, 66, 67, 68, 69, 70, 72, 73, 74, 75, 76, 78, 79, 80, 81, 82, 84, 85
Offset: 1
Links
- Harry J. Smith, Table of n, a(n) for n = 1..2000
- Aviezri S. Fraenkel, Jonathan Levitt and Michael Shimshoni, Characterization of the set of values f(n)=[n alpha], n=1,2,..., Discrete Math. 2 (1972), no.4, 335-345.
- Eric Weisstein's World of Mathematics, Beatty Sequence.
- Index entries for sequences related to Beatty sequences
Programs
-
Mathematica
Floor[Range[100]*Zeta[3]] (* Paolo Xausa, Jul 07 2024 *)
-
PARI
{ default(realprecision, 100); b=zeta(3); for (n = 1, 2000, write("b059537.txt", n, " ", floor(n*b)); ) } \\ Harry J. Smith, Jun 27 2009
Formula
a(n) = A047226(n+1), 1<=n<99. - R. J. Mathar, Oct 05 2008
a(n) = floor(n*zeta(3)). - Michel Marcus, Jan 04 2015