|
%I #10 Dec 15 2017 17:34:49
%S 0,0,1,1,3,5,11,23,52,120,286,702,1779,4636,12398,33981,95303,273134,
%T 798957,2382777,7238273,22376763,70343548,224698356,728843771,
%U 2399172217,8010042859,27109839313,92966452913,322876110331
%N Floor of (n/e)^(n/e).
%t ne[n_]:=Module[{c=n/E},Floor[c^c]];Array[ne,30] (* _Harvey P. Dale_, Nov 02 2011 *)
%o (PARI) v=[]; for(n=1,50,v=concat(v,floor((n/exp(1))^(n/exp(1))))); v
%K easy,nonn
%O 1,5
%A _Jason Earls_, Jun 30 2001
|
