A292988 Beatty sequence of the real root of 2*x^5 - 9*x^4 + 13*x^3 - 11*x^2 + 5*x - 1; complement of A292987.

2, 5, 8, 11, 13, 16, 19, 22, 24, 27, 30, 33, 35, 38, 41, 44, 46, 49, 52, 55, 57, 60, 63, 66, 68, 71, 74, 77, 79, 82, 85, 88, 90, 93, 96, 99, 101, 104, 107, 110, 112, 115, 118, 121, 123, 126, 129, 132, 134, 137, 140, 143, 145, 148, 151, 154, 156, 159, 162, 165, 167, 170, 173, 176, 179

Offset

1,1

Comments

First differs from A187341 at n = 21.

First differs from A108589 at n = 65.

Links

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

Eric Weisstein's World of Mathematics, Beatty Sequence

Index entries for sequences related to Beatty sequences

Formula

a(n) = floor(n * r), where r = 2.75393267425618214080...

Example

a(2) = floor(2 * 2.7539...) = floor(5.5078...) = 5.

Mathematica

r = N[ Root[2#^5 - 9#^4 + 13#^3 - 11#^2 + 5# - 1 &, 1], 64]; Array[ Floor[r #] &, 70] (* Robert G. Wilson v, Dec 10 2017 *)

Prog

(PARI) a(n) = floor(n*solve(x=2, 3, 2*x^5 - 9*x^4 + 13*x^3 - 11*x^2 + 5*x - 1))

Crossrefs

Cf. A187341, A108589.

Complement: A292987.

Sequence in context: A352748 A007826 A108589 * A330144 A187341 A329924

Adjacent sequences: A292985 A292986 A292987 * A292989 A292990 A292991

Keyword

nonn,changed

Author

Iain Fox, Dec 08 2017

Status

approved