A059548 -id:A059548 - cp's OEIS frontend

A059547 Beatty sequence for 1 + 1/log(3).

1, 3, 5, 7, 9, 11, 13, 15, 17, 19, 21, 22, 24, 26, 28, 30, 32, 34, 36, 38, 40, 42, 43, 45, 47, 49, 51, 53, 55, 57, 59, 61, 63, 64, 66, 68, 70, 72, 74, 76, 78, 80, 82, 84, 85, 87, 89, 91, 93, 95, 97, 99, 101, 103, 105, 106, 108, 110, 112, 114, 116, 118, 120, 122, 124

Offset: 1

Mitch Harris, Jan 22 2001

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

Beatty complement is A059548.

Cf. A121935.

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

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

a(n) = floor(n*(1 + A121935)). - Paolo Xausa, Jul 05 2024

A064720 A Beatty sequence for 3^i + 3^-i + 1.

Original entry on oeis.org

2, 4, 6, 8, 10, 12, 14, 16, 18, 20, 23, 25, 27, 29, 31, 33, 35, 37, 39, 41, 44, 46, 48, 50, 52, 54, 56, 58, 60, 62, 65, 67, 69, 71, 73, 75, 77, 79, 81, 83, 86, 88, 90, 92, 94, 96, 98, 100, 102, 104, 107, 109, 111, 113, 115, 117, 119, 121, 123, 125, 128, 130, 132, 134

Offset: 1

Robert G. Wilson v, Oct 13 2001

3^i + 3^-i + 1 ~= 1.90966484565321951005513028719008497... ~= 21/11.

Different from A059548, although the sequences agree for about 1400 terms. - Joshua Zucker, Apr 25 2007

Harry J. Smith, Table of n, a(n) for n = 1..2000

Cf. A064719.

a = Chop[ N[ 3^I + 3^-I +1, 36], 10^-40]; Table[ Floor[n*a/(a-1)], {n, 1, 75} ]

{ default(realprecision, 100); b=real(3^I + 3^-I) + 1; b=b/(b - 1); for (n = 1, 2000, write("b064720.txt", n, " ", floor(n*b)) ) } \\ Harry J. Smith, Sep 23 2009

cp's OEIS Frontend

A059547 Beatty sequence for 1 + 1/log(3).

Views

Author

Keywords

Links

Crossrefs

Programs

Mathematica

PARI

Formula