A214076 a(n) = ceiling(e^(n/3)).

2, 2, 3, 4, 6, 8, 11, 15, 21, 29, 40, 55, 77, 107, 149, 208, 290, 404, 564, 786, 1097, 1531, 2136, 2981, 4161, 5807, 8104, 11309, 15783, 22027, 30741, 42902, 59875, 83562, 116619, 162755, 227143, 317004, 442414, 617438

Offset

1,1

Links

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

Maple

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

Mathematica

Ceiling[E^(Range[40]/3)] (* Harvey P. Dale, Aug 22 2012 *)

Prog

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

Crossrefs

Cf. A005181, A005182, A214077.

Sequence in context: A217314 A173508 A103632 * A067859 A006207 A318403

Adjacent sequences: A214073 A214074 A214075 * A214077 A214078 A214079

Keyword

easy,nonn

Author

Mohammad K. Azarian, Jul 02 2012

Status

approved