OFFSET
3,1
EXAMPLE
7! = 5040, floor(log(7)) = 1, prime(1)=2 and 5040/2 = 2520.
MAPLE
f(n) = for(x=3, n, print1(x!/prime(floor(log(x)))", "))
MATHEMATICA
Table[n!/Prime[Floor[Log[n]]], {n, 3, 20}] (* Harvey P. Dale, Jun 04 2019 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Cino Hilliard, Dec 02 2003
STATUS
approved