OFFSET
1,2
LINKS
Reinhard Zumkeller, Table of n, a(n) for n = 1..10000
Eric Weisstein's World of Mathematics, Beatty Sequence
MAPLE
MATHEMATICA
a[n_] := Floor[n E/(E - 1)];
Array[a, 100] (* Jean-François Alcover, Mar 24 2020 *)
PROG
(Haskell)
a054385 n = a054385_list !! n
a054385_list = map (floor . (* e') . fromIntegral) [1..]
where e' = e / (e - 1); e = exp 1
-- Reinhard Zumkeller, Jul 06 2013
(Python)
from sympy import E
print([n*E//(E-1) for n in range(1, 70)]) # Karl V. Keller, Jr., Aug 07 2020
CROSSREFS
KEYWORD
nonn
AUTHOR
STATUS
approved