A184531 Upper s-Wythoff sequence, where s=5n-4. Complement of A184530.

2, 9, 15, 21, 27, 33, 39, 46, 52, 58, 64, 70, 77, 83, 89, 95, 101, 108, 114, 120, 126, 132, 139, 145, 151, 157, 163, 170, 176, 182, 188, 194, 201, 207, 213, 219, 225, 231, 238, 244, 250, 256, 262, 269, 275, 281, 287, 293, 300, 306, 312, 318, 324, 331, 337

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 = 4; 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, A184530.

Sequence in context: A272044 A354972 A304803 * A063105 A215035 A324522

Adjacent sequences: A184528 A184529 A184530 * A184532 A184533 A184534

Keyword

nonn

Author

Clark Kimberling, Jan 16 2011

Status

approved