login

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

A059565
Beatty sequence for e^gamma (gamma is the Euler-Mascheroni constant A001620).
4
1, 3, 5, 7, 8, 10, 12, 14, 16, 17, 19, 21, 23, 24, 26, 28, 30, 32, 33, 35, 37, 39, 40, 42, 44, 46, 48, 49, 51, 53, 55, 56, 58, 60, 62, 64, 65, 67, 69, 71, 73, 74, 76, 78, 80, 81, 83, 85, 87, 89, 90, 92, 94, 96, 97, 99, 101, 103, 105, 106, 108, 110, 112, 113, 115, 117
OFFSET
1,2
LINKS
Aviezri S. Fraenkel, Jonathan Levitt, Michael Shimshoni, Characterization of the set of values f(n)=[n alpha], n=1,2,..., Discrete Math. 2 (1972), no.4, 335-345.
Eric Weisstein's World of Mathematics, Beatty Sequence.
MATHEMATICA
Table[ Floor[ n * E^EulerGamma], {n, 1, 70} ]
PROG
(PARI) { default(realprecision, 100); b=exp(1)^Euler; for (n = 1, 2000, write("b059565.txt", n, " ", floor(n*b)); ) } \\ Harry J. Smith, Jun 28 2009
(Magma) R:=RealField(100); [Floor(Exp(EulerGamma(R))*n): n in [1..100]]; // G. C. Greubel, Aug 27 2018
CROSSREFS
Cf. A073004. Beatty complement is A059566.
Sequence in context: A037086 A327212 A329825 * A329999 A187841 A253301
KEYWORD
nonn,easy
AUTHOR
Mitch Harris, Jan 22 2001
STATUS
approved