A140098 A Beatty sequence: a(n) = [n*(1+1/t)], where t = tribonacci constant (A058265); complement of A140099.

1, 3, 4, 6, 7, 9, 10, 12, 13, 15, 16, 18, 20, 21, 23, 24, 26, 27, 29, 30, 32, 33, 35, 37, 38, 40, 41, 43, 44, 46, 47, 49, 50, 52, 54, 55, 57, 58, 60, 61, 63, 64, 66, 67, 69, 71, 72, 74, 75, 77, 78, 80, 81, 83, 84, 86, 87, 89, 91, 92, 94, 95, 97, 98, 100, 101, 103, 104, 106

Offset

1,2

Links

N. J. A. Sloane, Table of n, a(n) for n = 1..20000

Eric Weisstein's World of Mathematics, Beatty Sequence.

Index entries for sequences related to Beatty sequences.

Example

Tribonacci constant: t = 1.839286755214161132551852564653286600...
1 + 1/t = 1.54368901269207636157085597180174798652520...

Mathematica

Floor[Range[100]*(1 + 1/Root[#^3-#^2-#-1 &, 1])] (* Paolo Xausa, Jul 09 2024 *)

Prog

(PARI) {a(n)=local(t=(1+(19+3*sqrt(33))^(1/3)+(19-3*sqrt(33))^(1/3))/3); floor(n*(1+1/t))}

Crossrefs

Cf. A140099, A140100, A058265.

Sequence in context: A258574 A064717 A109231 * A226901 A286323 A059559

Adjacent sequences: A140095 A140096 A140097 * A140099 A140100 A140101

Keyword

nonn,changed

Author

Paul D. Hanna, Jun 01 2008

Status

approved