login
A214076
a(n) = ceiling(e^(n/3)).
2
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
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
KEYWORD
easy,nonn
AUTHOR
Mohammad K. Azarian, Jul 02 2012
STATUS
approved