A038128 Beatty sequence for Euler's constant (A001620).

0, 0, 1, 1, 2, 2, 3, 4, 4, 5, 5, 6, 6, 7, 8, 8, 9, 9, 10, 10, 11, 12, 12, 13, 13, 14, 15, 15, 16, 16, 17, 17, 18, 19, 19, 20, 20, 21, 21, 22, 23, 23, 24, 24, 25, 25, 26, 27, 27, 28, 28, 29, 30, 30, 31, 31, 32, 32, 33, 34, 34, 35, 35, 36, 36, 37, 38, 38, 39, 39, 40, 40, 41, 42, 42, 43

Offset

0,5

Links

Karl V. Keller, Jr., Table of n, a(n) for n = 0..100000

Index entries for sequences related to Beatty sequences

Formula

a(n) = floor(n*0.5772156649...). - Typo fixed by Karl V. Keller, Jr., Jul 27 2015

Mathematica

Table[Floor[n*EulerGamma], {n, 0, 100}]

Prog

(Magma) [Floor((n*EulerGamma(RealField(100)))) : n in [0..100]]; // Vincenzo Librandi, Aug 15 2015
(PARI) a(n) = floor(n*Euler); \\ Michel Marcus, Oct 24 2015

Crossrefs

Sequence in context: A194212 A194208 A057358 * A097337 A263574 A366701

Adjacent sequences: A038125 A038126 A038127 * A038129 A038130 A038131

Keyword

nonn,easy

Author

Felice Russo

Extensions

More terms from Leah Frazee (s1166278(AT)Cedarville.edu)

a(0) term added by T. D. Noe, Mar 27 2011

Status

approved