

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
(list;
graph;
refs;
listen;
history;
text;
internal format)



OFFSET

3,1


LINKS

Table of n, a(n) for n=3..20.


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
Adjacent sequences: A089054 A089055 A089056 * A089058 A089059 A089060


KEYWORD

nonn


AUTHOR

Cino Hilliard, Dec 02 2003


STATUS

approved



