A367670 a(n) = Product_{i=1..n, j=1..n} (i^8 + i^4*j^4 + j^8).
3, 171714816, 9817265089769041882465383168, 351690857158733335833718073682368165890982417955022627663773696
Offset: 1
Keywords
Programs
-
Mathematica
Table[Product[Product[i^8 + i^4*j^4 + j^8, {i, 1, n}], {j, 1, n}], {n, 1, 7}]
-
Python
from math import prod, factorial def A367670(n): return (prod((k:=j**4)**2+(m:=i**4)*(m+k) for i in range(1,n) for j in range(i+1,n+1))*factorial(n)**4)**2*3**n # Chai Wah Wu, Nov 26 2023