login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A024585 a(n) = Sum_{k=1..n} [ 1/{k*Pi} ], where {x} := x - [ x ]. 2
7, 10, 12, 13, 14, 15, 16, 23, 26, 28, 29, 30, 31, 32, 40, 43, 45, 46, 47, 48, 49, 57, 60, 62, 63, 64, 65, 66, 75, 79, 81, 82, 83, 84, 85, 95, 99, 101, 102, 103, 104, 105, 116, 120, 122, 123, 124, 125, 126, 138, 142, 144, 145, 146, 147, 148, 162, 166, 168, 170, 171, 172, 173, 189 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,1

LINKS

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

MATHEMATICA

Table[Sum[Floor[1/FractionalPart[k*Pi]], {k, n}], {n, 100}] (* Clark Kimberling, Aug 18 2012 *)

PROG

(PARI) a(n) = sum(k=1, n, floor(1/frac((k*Pi)))); \\ Michel Marcus, Jul 17 2019

CROSSREFS

Cf. A024586. Partial sums of A024584.

Sequence in context: A107018 A247868 A048792 * A190482 A128783 A024586

Adjacent sequences:  A024582 A024583 A024584 * A024586 A024587 A024588

KEYWORD

nonn

AUTHOR

Clark Kimberling

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified May 17 19:51 EDT 2022. Contains 353778 sequences. (Running on oeis4.)