login
a(n) = floor(e^(n/3)).
2

%I #27 Jan 20 2024 11:27:59

%S 1,1,2,3,5,7,10,14,20,28,39,54,76,106,148,207,289,403,563,785,1096,

%T 1530,2135,2980,4160,5806,8103,11308,15782,22026,30740,42901,59874,

%U 83561,116618,162754,227142,317003,442413,617437

%N a(n) = floor(e^(n/3)).

%H Vincenzo Librandi, <a href="/A214077/b214077.txt">Table of n, a(n) for n = 1..1000</a>

%p A214077:=n->floor(exp(n/3)): seq(A214077(n), n=1..60); # _Wesley Ivan Hurt_, Jan 11 2016

%t Floor[E^(Range[50]/3)] (* _Vincenzo Librandi_, Feb 13 2013 *)

%o (Derive) PROG(y := [], n := 60, LOOP(IF(n = 0, RETURN y), y := ADJOIN(FLOOR(ê^(n/3)), y), n := n - 1))

%o (Magma) [Floor(Exp(n)^(1/3)): n in [1..50]]; // _Vincenzo Librandi_, Feb 13 2013

%o (PARI) a(n) = floor(exp(n/3)); \\ _Michel Marcus_, Jan 11 2016

%Y Cf. A005181, A005182, A214076.

%K easy,nonn

%O 1,3

%A _Mohammad K. Azarian_, Jul 02 2012