A059568 Beatty sequence for 1 - 1/log(log(2)).

3, 7, 11, 14, 18, 22, 26, 29, 33, 37, 41, 44, 48, 52, 55, 59, 63, 67, 70, 74, 78, 82, 85, 89, 93, 96, 100, 104, 108, 111, 115, 119, 123, 126, 130, 134, 137, 141, 145, 149, 152, 156, 160, 164, 167, 171, 175, 178, 182, 186, 190, 193, 197, 201, 205, 208, 212, 216

Offset

1,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

Formula

a(n) = floor(n*(1 - 1/log(log(2)))). - Michel Marcus, Jan 04 2015

Mathematica

Floor[Range[100]*(1 - 1/Log[Log[2]])] (* Paolo Xausa, Jul 05 2024 *)

Prog

(PARI) { default(realprecision, 100); b=1 - 1/log(log(2)); for (n = 1, 2000, write("b059568.txt", n, " ", floor(n*b)); ) } \\ Harry J. Smith, Jun 28 2009

Crossrefs

Beatty complement is A059567.

Cf. A074785.

Sequence in context: A260484 A343028 A000572 * A003512 A246170 A190694

Adjacent sequences: A059565 A059566 A059567 * A059569 A059570 A059571

Keyword

nonn,easy

Author

Mitch Harris, Jan 22 2001

Status

approved