%I A067850
%S A067850 0,0,1,2,4,6,9,12,15,18,21,25,28,32,36,40,44,48,52,56,61,65,69,74,79,
%T A067850 83,88,93,97,102,107,112,117,122,127,132,138,143,148,153,159,164,169,
%U A067850 175,180,186,191,197,202,208,214,219,225,231,237,242,248,254,260,266
%N A067850 Highest power of 2 not exceeding n!.
%C A067850 2^a(n) <= n! < 2^[a(n)+1]
%F A067850 floor(log[2](n!)). - Vladeta Jovovic (vladeta(AT)eunet.rs), Feb 18 2002
%t A067850 f[n_] := Block[{k = 0}, While[2^k <= n!, k++ ]; k--; k]; Table[ f[n], 
               {n, 0, 60} ]
%Y A067850 Cf. A000142.
%Y A067850 Sequence in context: A130664 A014011 A064424 this_sequence A130240 A143118 
               A162800
%Y A067850 Adjacent sequences: A067847 A067848 A067849 this_sequence A067851 A067852 
               A067853
%K A067850 nonn
%O A067850 0,4
%A A067850 Lekraj Beedassy (blekraj(AT)yahoo.com), Feb 15 2002
%E A067850 Edited and extended by Robert G. Wilson v (rgwv(AT)rgwv.com), Feb 16 
               2002