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 A374431 #15 Jul 13 2024 10:12:21 %S A374431 1,1,2,3,4,5,72,7,16,27,800,11,5184,13,6272,30375,256,17,373248,19, %T A374431 640000,750141,247808,23,26873856,3125,1384448,19683,39337984,29, %U A374431 30233088000000,31,65536,235782657,37879808,1313046875,139314069504,37,189267968,3502727631 %N A374431 Row product of A374433. %H A374431 Michael De Vlieger, <a href="/A374431/a374431.png">Log log scatterplot of Log_10(a(n))</a>, n = 0..1024, showing odd indexed terms in red, even indexed terms in blue. %p A374431 seq(mul(A374433(n, k), k = 0..n), n=0..40); %t A374431 nn = 39; Do[Set[s[i], FactorInteger[i][[All, 1]]], {i, 0, nn}]; s[0] = {1}; Array[Product[Times @@ Intersection[s[k], s[#]], {k, 0, #}] &, nn + 1, 0] (* _Michael De Vlieger_, Jul 11 2024 *) %o A374431 (Python) %o A374431 from math import prod %o A374431 print([prod([A374433(n, k) for k in range(n + 1)]) for n in range(40)]) %Y A374431 Cf. A374433, A374430 (odd bisection). %K A374431 nonn %O A374431 0,3 %A A374431 _Peter Luschny_, Jul 10 2024