OFFSET
0,2
LINKS
G. C. Greubel, Table of n, a(n) for n = 0..1000
MATHEMATICA
Table[ Floor[E^(n/2*ArcCosh[1 + Sqrt[2]])], {n, 0, 30}]
PROG
(PARI) for(n=0, 30, print1(floor(exp((n/2)*acosh(1+sqrt(2)))), ", ")) \\ G. C. Greubel, Oct 01 2018
(Magma) [Floor(Exp((n/2)*Argcosh(1+Sqrt(2)))): n in [0..30]]; // G. C. Greubel, Oct 01 2018
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Robert G. Wilson v, Apr 09 2004
STATUS
approved