A020647 Least positive integer k for which 8^n divides k!.

1, 4, 8, 12, 16, 16, 20, 24, 28, 32, 32, 36, 40, 42, 46, 48, 52, 56, 58, 62, 64, 64, 68, 72, 76, 80, 80, 84, 88, 92, 96, 96, 100, 104, 106, 110, 112, 116, 120, 122, 126, 128, 128, 132, 136, 138, 142, 144, 148, 152, 154, 158, 160, 162, 166, 168, 172, 176, 178, 182, 184, 188

Offset

0,2

Links

T. D. Noe, Table of n, a(n) for n = 0..1000

Mathematica

lpi[n_]:=Module[{k=1, n8=8^n}, While[!Divisible[k!, n8], k++]; k]; Array[ lpi, 70, 0] (* Harvey P. Dale, Dec 08 2015 *)

Crossrefs

Sequence in context: A242399 A081747 A331061 * A274919 A196032 A130702

Adjacent sequences: A020644 A020645 A020646 * A020648 A020649 A020650

Keyword

nonn

Author

David W. Wilson

Status

approved