This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A308820 #19 Sep 22 2024 15:19:53 %S A308820 1,2,12,96,2880,34560,5806080,92897280,25082265600,2006581248000, %T A308820 794606174208000,19070548180992000,208250386136432640000, %U A308820 5831010811820113920000,4198327784510482022400000,3224315738504050193203200000,14799609239733590386802688000000 %N A308820 a(n) = Product_{k=1..n} ceiling(n/k)!. %H A308820 G. C. Greubel, <a href="/A308820/b308820.txt">Table of n, a(n) for n = 1..178</a> %F A308820 a(n) = Product_{k=1..n-1} Product_{d|k} (d + 1). %F A308820 a(n) = Product_{k=1..n-1} (k + 1)^floor((n-1)/k). - _Ridouane Oudra_, Apr 10 2023 %F A308820 a(n) = A131385(n)*A092143(n-1). - _Ridouane Oudra_, Sep 20 2024 %p A308820 seq(mul(ceil(n/k)!, k=1..n), n=1..30); # _Ridouane Oudra_, Apr 10 2023 %t A308820 a[n_] := Product[Ceiling[n/k]!, {k, 1, n}]; Table[a[n], {n, 1, 17}] %o A308820 (PARI) a(n) = prod(k=1, n, ceil(n/k)!); \\ _Michel Marcus_, Jun 27 2019 %o A308820 (Magma) [(&*[Factorial(Ceiling(n/(n-j+1))): j in [1..n]]): n in [1..20]]; // _G. C. Greubel_, Mar 08 2023 %o A308820 (SageMath) %o A308820 def A308820(n): return product( factorial(ceil(n/(n-k+1))) for k in range(1,n+1)) %o A308820 [A308820(n) for n in range(1,21)] # _G. C. Greubel_, Mar 08 2023 %Y A308820 Cf. A010786, A020696, A092143, A131385. %K A308820 nonn %O A308820 1,2 %A A308820 _Ilya Gutkovskiy_, Jun 26 2019