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 A345726 #12 Feb 05 2024 03:38:37 %S A345726 1,2,6,192,960,4976640,34836480,2283043553280,4993016251023360, %T A345726 3195530400654950400000,35150834407204454400000, %U A345726 417877827219530751882239882035200000,5432411753853899774469118466457600000,213700126654516647665669790727613605478400000 %N A345726 a(n) = Product_{k=1..n} k^(floor(n/k)^2). %H A345726 G. C. Greubel, <a href="/A345726/b345726.txt">Table of n, a(n) for n = 1..55</a> %F A345726 log(a(n)) ~ c * n^2, where c = -zeta'(2) = A073002. %t A345726 Table[Product[k^(Floor[n/k]^2), {k, 1, n}], {n, 1, 15}] %o A345726 (PARI) a(n) = prod(k=1, n, k^((n\k)^2)); \\ _Michel Marcus_, Jun 26 2021 %o A345726 (Magma) [(&*[j^(Floor(n/j))^2: j in [1..n]]): n in [1..30]]; // _G. C. Greubel_, Feb 05 2024 %o A345726 (SageMath) [product(j^((n//j)^2) for j in range(1,n+1)) for n in range(1,31)] # _G. C. Greubel_, Feb 05 2024 %Y A345726 Cf. A073002, A092143, A129364. %K A345726 nonn %O A345726 1,2 %A A345726 _Vaclav Kotesovec_, Jun 25 2021