A184626 floor(nr+h), where r=sqrt(3), h=1/4; complement of A184627.

1, 3, 5, 7, 8, 10, 12, 14, 15, 17, 19, 21, 22, 24, 26, 27, 29, 31, 33, 34, 36, 38, 40, 41, 43, 45, 47, 48, 50, 52, 53, 55, 57, 59, 60, 62, 64, 66, 67, 69, 71, 72, 74, 76, 78, 79, 81, 83, 85, 86, 88, 90, 92, 93, 95, 97, 98, 100, 102, 104, 105, 107, 109, 111, 112, 114, 116, 118, 119, 121, 123, 124, 126, 128, 130, 131, 133, 135, 137, 138, 140, 142, 144, 145, 147, 149, 150, 152, 154, 156, 157, 159, 161, 163, 164, 166, 168, 169, 171, 173, 175, 176, 178, 180, 182, 183, 185, 187, 189, 190, 192, 194, 195, 197, 199, 201, 202, 204, 206, 208

Offset

1,2

Links

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

Formula

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

Mathematica

r=3^(1/2); h=1/4; s=r/(r-1);
Table[Floor[n*r+h], {n, 1, 120}]  (* A184626 *)
Table[Floor[n*s+h-h*s], {n, 1, 120}]  (* A184627 *)

Crossrefs

Cf. A184618, A184627.

Sequence in context: A213908 A247514 A144077 * A047392 A330117 A292648

Adjacent sequences: A184623 A184624 A184625 * A184627 A184628 A184629

Keyword

nonn

Author

Clark Kimberling, Jan 18 2011

Status

approved