OFFSET
1,1
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 1..1000
MAPLE
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