A046157 Number of empty intervals when fractional_part(i*gamma) for i = 1, ..., n is plotted along [ 0, 1 ] subdivided into n equal regions, where gamma is the Euler-Mascheroni constant.

0, 0, 0, 1, 0, 0, 0, 1, 2, 2, 3, 0, 3, 5, 3, 3, 3, 2, 0, 3, 2, 2, 2, 1, 1, 0, 2, 3, 4, 3, 3, 3, 7, 6, 7, 7, 8, 8, 13, 10, 10, 10, 12, 11, 6, 13, 14, 14, 14, 14, 15, 26, 16, 19, 14, 17, 18, 18, 19, 18, 20, 18, 21, 18, 20, 20, 21, 21, 19, 21, 15, 20, 23, 21, 21, 20, 22, 26, 21, 22, 20

Offset

1,9

Links

Ivan Neretin, Table of n, a(n) for n = 1..10000

Eric Weisstein's World of Mathematics, Equidistributed Sequence.

Mathematica

Table[Length@Complement[Range[n] - 1, Floor[n*FractionalPart[EulerGamma*Range[n]]]], {n, 81}] (* Ivan Neretin, Jan 23 2018 *)

Crossrefs

Cf. A046158 (positions of 0).

Similar sequences with other constants: A036412 (e), A036414 (phi), A036416 (Pi).

Sequence in context: A129234 A213081 A127446 * A035167 A071448 A071449

Adjacent sequences: A046154 A046155 A046156 * A046158 A046159 A046160

Keyword

nonn,look

Author

Eric W. Weisstein

Status

approved