(Translated by https://www.hiragana.jp/)
A089057 - OEIS
login
A089057
n! divided by prime whose index is the integer part of log(n).
0
3, 12, 60, 360, 2520, 13440, 120960, 1209600, 13305600, 159667200, 2075673600, 29059430400, 435891456000, 6974263296000, 118562476032000, 2134124568576000, 40548366802944000, 810967336058880000
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
Sequence in context: A070863 A180707 A062569 * A077134 A001710 A105752
KEYWORD
nonn
AUTHOR
Cino Hilliard, Dec 02 2003
STATUS
approved