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

1, 3, 4, 5, 6, 7, 8, 10, 11, 12, 13, 14, 16, 17, 18, 19, 20, 22, 23, 24, 25, 26, 28, 29, 30, 31, 32, 34, 35, 36, 37, 38, 40, 41, 42, 43, 44, 45, 47, 48, 49, 50, 51, 53, 54, 55, 56, 57, 59, 60, 61, 62, 63, 65, 66, 67, 68, 69, 71, 72, 73, 74, 75, 76, 78, 79

Offset

1,2

Comments

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

Links

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

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, A184531.

Sequence in context: A057903 A247833 A047310 * A304804 A359776 A077656

Adjacent sequences: A184527 A184528 A184529 * A184531 A184532 A184533

Keyword

nonn

Author

Clark Kimberling, Jan 16 2011

Status

approved