OFFSET
1,3
LINKS
Harry J. Smith, Table of n, a(n) for n=1..500
MATHEMATICA
Table[Floor[Exp[n/Pi]], {n, 1, 50}] (* G. C. Greubel, Jan 31 2019 *)
PROG
(PARI) v=[]; for(n=1, 65, v=concat(v, floor(exp(n/Pi)))); v
(PARI) { default(realprecision, 100); for (n=1, 500, write("b062121.txt", n, " ", floor(exp(n/Pi))) ) } \\ Harry J. Smith, Aug 02 2009
(Magma) R:= RealField(10); [Floor(Exp(n/Pi(R))): n in [1..50]]; // G. C. Greubel, Jan 31 2019
(Sage) [floor(exp(n/pi)) for n in (1..50)] # G. C. Greubel, Jan 31 2019
CROSSREFS
KEYWORD
nonn
AUTHOR
Jason Earls, Jun 29 2001
EXTENSIONS
Corrected by T. D. Noe, Oct 25 2006
OFFSET changed from 0,3 to 1,3 by Harry J. Smith, Aug 02 2009
STATUS
approved