login
a(n) = n! / d(n), where d(n) is the number of divisors of n.
1

%I #15 May 03 2024 14:21:37

%S 1,1,3,8,60,180,2520,10080,120960,907200,19958400,79833600,3113510400,

%T 21794572800,326918592000,4184557977600,177843714048000,

%U 1067062284288000,60822550204416000,405483668029440000

%N a(n) = n! / d(n), where d(n) is the number of divisors of n.

%H Harry J. Smith, <a href="/A062358/b062358.txt">Table of n, a(n) for n = 1..100</a>

%e a(7) = 2520 because 7!/d(7) = 5040/2 = 2520.

%t Table[n!/DivisorSigma[0, n], {n, 30}] (* _Wesley Ivan Hurt_, May 03 2024 *)

%o (PARI) a(n)=n!/numdiv(n);

%K easy,nonn

%O 1,3

%A _Jason Earls_, Jul 06 2001