A024547 a(n) = [ n/{n*sqrt(3)} ], where {x} := x - [ x ].

1, 4, 15, 4, 7, 15, 56, 9, 15, 31, 209, 15, 25, 56, 15, 22, 38, 101, 20, 31, 56, 209, 27, 42, 82, 780, 35, 56, 126, 31, 44, 75, 209, 38, 56, 101, 430, 46, 70, 141, 2911, 56, 89, 209, 47, 68, 115, 346, 56, 82, 152, 780, 66, 101, 209, 56, 78, 126, 308, 65, 93, 160, 528, 75, 111, 209

Offset

1,2

Links

Clark Kimberling, Table of n, a(n) for n = 1..1000

Mathematica

Table[Floor[n/FractionalPart[n*Sqrt[3]]], {n, 100}] (* Clark Kimberling, Aug 17 2012 *)

Crossrefs

Cf. A024548.

Sequence in context: A261711 A128235 A357116 * A328839 A143899 A154068

Adjacent sequences: A024544 A024545 A024546 * A024548 A024549 A024550

Keyword

nonn

Author

Clark Kimberling

Status

approved