A330003 Beatty sequence for (x+1)^2, where 1/x + 1/(x+1)^2 = 1.

5, 10, 15, 20, 25, 30, 35, 40, 45, 50, 55, 60, 65, 70, 75, 80, 85, 90, 95, 100, 106, 111, 116, 121, 126, 131, 136, 141, 146, 151, 156, 161, 166, 171, 176, 181, 186, 191, 196, 201, 207, 212, 217, 222, 227, 232, 237, 242, 247, 252, 257, 262, 267, 272, 277, 282

Offset

1,1

Comments

Let x be the solution of 1/x + 1/(x+1)^2 = 1. Then (floor(n x) and (floor(n (x+1)^2))) are a pair of Beatty sequences; i.e., every positive integer is in exactly one of the sequences. See the Guide to related sequences at A329825.

Links

Table of n, a(n) for n=1..56.

Eric Weisstein's World of Mathematics, Beatty Sequence.

Index entries for sequences related to Beatty sequences

Formula

a(n) = floor(n x), where x = 1.24697960371... is the constant in A255249.

Mathematica

r = x /. FindRoot[1/x + 1/(x+1)^2 == 1, {x, 2, 10}, WorkingPrecision -> 120]
RealDigits[r][[1]] (* A255249 *)
Table[Floor[n*r]], {n, 1, 250}]       (* A330002 *)
Table[Floor[n*(1+r)^2], {n, 1, 250}]  (* A330003 *)

Crossrefs

Cf. A329825, A255249, A330002 (complement).

Sequence in context: A172336 A140233 A172328 * A061821 A085128 A313734

Adjacent sequences: A330000 A330001 A330002 * A330004 A330005 A330006

Keyword

nonn,easy

Author

Clark Kimberling, Jan 04 2020

Status

approved