OFFSET
0,4
COMMENTS
Beatty sequence of A063504. - R. J. Mathar, Aug 11 2012
LINKS
Ivan Panchenko, Table of n, a(n) for n = 0..10000
MATHEMATICA
With[{c=E^Pi-Pi^E}, Floor[c*Range[0, 80]]] (* Harvey P. Dale, Jan 06 2012 *)
PROG
(PARI) for(n=0, 50, print1(floor(n*(exp(Pi) - Pi^exp(1))), ", ")) \\ G. C. Greubel, Nov 06 2017
(Magma) C<i> := ComplexField(); [Floor(n*(Exp(1)^Pi(C) - Pi(C)^Exp(1) )): n in [0..50]]; // G. C. Greubel, Nov 06 2017
CROSSREFS
KEYWORD
nonn
AUTHOR
Mohammad K. Azarian, Sep 02 2006
STATUS
approved