login
A088656
a(n) = floor( (2/(exp(1) - 2))^n ) for n >= 2, a(1) = 1.
1
1, 7, 21, 60, 167, 466, 1297, 3613, 10060, 28012, 77998, 217180, 604723, 1683804, 4688422, 13054548, 36349377, 101212019, 281817012, 784697597, 2184929553, 6083766752, 16939776315, 47167492325, 131334221349, 365689945495
OFFSET
1,2
LINKS
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
Sequence in context: A146464 A001354 A200930 * A146139 A083596 A082541
KEYWORD
nonn
AUTHOR
Roger L. Bagula, Nov 21 2003
EXTENSIONS
Edited by G. C. Greubel, Dec 05 2022
STATUS
approved