OFFSET
1,2
LINKS
G. C. Greubel, Table of n, a(n) for n = 1..1000
FORMULA
a(n) = floor( (2/(exp(1) - 2))^n ), with a(1) = 1.
MATHEMATICA
Table[If[n==1, 1, Floor[(2/(E-2))^n]], {n, 40}]
PROG
(Magma) [n eq 1 select 1 else Floor((2/(Exp(1)-2))^n): n in [1..40]]; // G. C. Greubel, Dec 05 2022
(SageMath)
def A088656(n): return 1 if (n==1) else floor((2/(exp(1)-2))^n)
[A088656(n) for n in range(1, 41)] # G. C. Greubel, Dec 05 2022
CROSSREFS
KEYWORD
nonn
AUTHOR
Roger L. Bagula, Nov 21 2003
EXTENSIONS
Edited by G. C. Greubel, Dec 05 2022
STATUS
approved