OFFSET
1,1
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 1..1000
MAPLE
MATHEMATICA
Table[Ceiling[2^(n+1)/n], {n, 1, 40}] (* Vincenzo Librandi, Dec 19 2011 *)
PROG
(Magma) [Ceiling(2^(n+1)/n): n in [1..40]]; // Vincenzo Librandi, Dec 19 2011
(PARI) vector(40, n, ceil(2^(n+1)/n) ) \\ G. C. Greubel, May 17 2019
(Sage) [ceil(2^(n+1)/n) for n in (1..40)] # G. C. Greubel, May 17 2019
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
N. J. A. Sloane, Mar 23 2000
STATUS
approved