A214077 a(n) = floor(e^(n/3)).

1, 1, 2, 3, 5, 7, 10, 14, 20, 28, 39, 54, 76, 106, 148, 207, 289, 403, 563, 785, 1096, 1530, 2135, 2980, 4160, 5806, 8103, 11308, 15782, 22026, 30740, 42901, 59874, 83561, 116618, 162754, 227142, 317003, 442413, 617437

Offset

1,3

Links

Vincenzo Librandi, Table of n, a(n) for n = 1..1000

Maple

A214077:=n->floor(exp(n/3)): seq(A214077(n), n=1..60); # Wesley Ivan Hurt, Jan 11 2016

Mathematica

Floor[E^(Range[50]/3)] (* Vincenzo Librandi, Feb 13 2013 *)

Prog

(Derive) PROG(y := [], n := 60, LOOP(IF(n = 0, RETURN y), y := ADJOIN(FLOOR(ê^(n/3)), y), n := n - 1))
(Magma) [Floor(Exp(n)^(1/3)): n in [1..50]]; // Vincenzo Librandi, Feb 13 2013
(PARI) a(n) = floor(exp(n/3)); \\ Michel Marcus, Jan 11 2016

Crossrefs

Cf. A005181, A005182, A214076.

Sequence in context: A000701 A123975 A321728 * A094984 A107332 A002062

Adjacent sequences: A214074 A214075 A214076 * A214078 A214079 A214080

Keyword

easy,nonn

Author

Mohammad K. Azarian, Jul 02 2012

Status

approved