login
A024586
a(n) = floor(Sum_{k=1..n} of 1/{k*Pi}) where { } denotes fractional part.
2
7, 10, 12, 14, 16, 17, 18, 25, 29, 31, 33, 35, 36, 37, 45, 49, 51, 53, 54, 56, 57, 65, 69, 72, 74, 75, 76, 77, 87, 91, 93, 95, 97, 98, 99, 109, 113, 116, 118, 119, 121, 122, 133, 137, 140, 142, 144, 145, 146, 158, 163, 166, 168, 169, 171, 172, 186, 190, 193, 195, 197, 198, 199, 215
OFFSET
1,1
LINKS
MATHEMATICA
Table[Floor[Sum[1/FractionalPart[k*Pi], {k, 1, n}]], {n, 1, 100}] (* Clark Kimberling, Aug 18 2012 *)
CROSSREFS
Cf. A024585.
Sequence in context: A024585 A190482 A128783 * A050419 A089373 A184114
KEYWORD
nonn
STATUS
approved