%I #13 Aug 28 2016 18:23:37
%S 1,4,8,12,16,16,20,24,28,32,32,36,40,42,46,48,52,56,58,62,64,64,68,72,
%T 76,80,80,84,88,92,96,96,100,104,106,110,112,116,120,122,126,128,128,
%U 132,136,138,142,144,148,152,154,158,160,162,166,168,172,176,178,182,184,188
%N Least positive integer k for which 8^n divides k!.
%H T. D. Noe, <a href="/A020647/b020647.txt">Table of n, a(n) for n = 0..1000</a>
%t lpi[n_]:=Module[{k=1,n8=8^n},While[!Divisible[k!,n8],k++];k]; Array[ lpi,70,0] (* _Harvey P. Dale_, Dec 08 2015 *)
%K nonn
%O 0,2
%A _David W. Wilson_