A184484 Lower s-Wythoff sequence, where s(n)=3n-2. Complement of A184485.

1, 3, 4, 5, 6, 8, 9, 10, 12, 13, 14, 16, 17, 18, 20, 21, 22, 23, 25, 26, 27, 29, 30, 31, 33, 34, 35, 36, 38, 39, 40, 42, 43, 44, 46, 47, 48, 49, 51, 52, 53, 55, 56, 57, 59, 60, 61, 62, 64, 65, 66, 68, 69, 70, 72, 73, 74, 76, 77, 78, 79, 81, 82, 83, 85, 86, 87, 89, 90, 91, 92, 94, 95, 96, 98, 99, 100, 102, 103, 104, 105, 107, 108, 109, 111, 112, 113, 115, 116, 117, 119, 120, 121, 122, 124, 125, 126, 128, 129, 130, 132, 133, 134, 135, 137, 138, 139, 141, 142, 143, 145, 146, 147, 148, 150, 151, 152, 154, 155, 156

Offset

1,2

Links

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

Mathematica

k=3; r=2; 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, A184485.

Sequence in context: A298606 A039095 A001957 * A253897 A100966 A358973

Adjacent sequences: A184481 A184482 A184483 * A184485 A184486 A184487

Keyword

nonn

Author

Clark Kimberling, Jan 15 2011

Status

approved