A184523 Upper s-Wythoff sequence, where s=5n. Complement of A184522.

6, 12, 18, 24, 30, 37, 43, 49, 55, 61, 68, 74, 80, 86, 92, 99, 105, 111, 117, 123, 130, 136, 142, 148, 154, 161, 167, 173, 179, 185, 191, 198, 204, 210, 216, 222, 229, 235, 241, 247, 253, 260, 266, 272, 278, 284, 291, 297, 303, 309, 315, 322, 328, 334, 340

Offset

1,1

Comments

See A184117 for the definition of lower and upper s-Wythoff sequences.

Links

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

Mathematica

k = 5; r = -1; d = Sqrt[4 + k^2];
a[n_] := Floor[(1/2) (d + 2 - k) (n + r/(d + 2))];
b[n_] := Floor[(1/2) (d + 2 + k) (n - r/(d + 2))];
Table[a[n], {n, 120}]
Table[b[n], {n, 120}]

Crossrefs

Cf. A184117, A184522.

Sequence in context: A194385 A043369 A028436 * A246977 A037230 A277723

Adjacent sequences: A184520 A184521 A184522 * A184524 A184525 A184526

Keyword

nonn

Author

Clark Kimberling, Jan 16 2011

Status

approved