A184734 a(n)=floor(nr+h), where r=(1+sqrt(5))/2, h=1/3; complement of A184735.

1, 3, 5, 6, 8, 10, 11, 13, 14, 16, 18, 19, 21, 22, 24, 26, 27, 29, 31, 32, 34, 35, 37, 39, 40, 42, 44, 45, 47, 48, 50, 52, 53, 55, 56, 58, 60, 61, 63, 65, 66, 68, 69, 71, 73, 74, 76, 77, 79, 81, 82, 84, 86, 87, 89, 90, 92, 94, 95, 97, 99, 100, 102, 103, 105, 107, 108, 110, 111, 113, 115, 116, 118, 120, 121, 123, 124, 126, 128, 129, 131, 133, 134, 136, 137, 139, 141, 142, 144, 145, 147, 149, 150, 152, 154, 155, 157, 158, 160, 162, 163, 165, 166, 168, 170, 171, 173, 175, 176, 178, 179, 181, 183, 184, 186, 188, 189, 191, 192, 194

Offset

1,2

Comments

Differs from A184582 first at index n=137. - R. J. Mathar, Jan 29 2011

Links

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

Formula

a(n)=floor(nr+h), where r=(1+sqrt(5))/2, h=1/3.

Mathematica

r=(1+sqrt(5))/2, h=1/3; s=r/(r-1);
Table[Floor[n*r+h], {n, 1, 120}]  (* A184734 *)
Table[Floor[n*s+h-h*s], {n, 1, 120}]  (*A184735 *)

Crossrefs

Cf. A184735, A184658.

Sequence in context: A288934 A186356 A184582 * A189662 A186320 A247913

Adjacent sequences: A184731 A184732 A184733 * A184735 A184736 A184737

Keyword

nonn

Author

Clark Kimberling, Jan 20 2011

Status

approved