login
A024548
[ 1/{n*sqrt(3)} ], where {x} := x - [ x ].
3
1, 2, 5, 1, 1, 2, 8, 1, 1, 3, 19, 1, 1, 4, 1, 1, 2, 5, 1, 1, 2, 9, 1, 1, 3, 30, 1, 2, 4, 1, 1, 2, 6, 1, 1, 2, 11, 1, 1, 3, 71, 1, 2, 4, 1, 1, 2, 7, 1, 1, 2, 15, 1, 1, 3, 1, 1, 2, 5, 1, 1, 2, 8, 1, 1, 3, 21, 1, 1, 4, 1, 1, 2, 5, 1, 1, 2, 10, 1, 1, 3, 35, 1, 2, 4, 1, 1, 2, 6, 1, 1, 2, 12, 1, 1, 3, 112, 1, 2, 4
OFFSET
1,2
LINKS
MATHEMATICA
Table[Floor[1/FractionalPart[n*Sqrt[3]]], {n, 100}] (* Clark Kimberling, Aug 17 2012 *)
CROSSREFS
Cf. A024547.
Sequence in context: A284750 A092134 A181779 * A376316 A197737 A189824
KEYWORD
nonn
STATUS
approved