login
a(n) = min { 2^n, floor(100/sqrt(n)) }.
0

%I #7 Mar 28 2015 11:39:12

%S 2,4,8,16,32,40,37,35,33,31,30,28,27,26,25,25,24,23,22,22,21,21,20,20,

%T 20,19,19,18,18,18,17,17,17,17,16,16,16,16,16,15,15,15,15,15,14,14,14,

%U 14,14,14,14,13,13,13,13,13,13,13,13,12,12,12,12,12

%N a(n) = min { 2^n, floor(100/sqrt(n)) }.

%t Table[Min[2^n,Floor[100/Sqrt[n]]],{n,70}] (* _Harvey P. Dale_, Oct 31 2013 *)

%K nonn

%O 0,1

%A _N. J. A. Sloane_