A381166 a(n) is the permanent of the n X n matrix whose element (i,j) is equal to A008277(i+4, j) with 1 <= i,j <= n.
1, 1, 46, 23216, 70437736, 911400637082, 39931366088759328, 5015203546888139970264, 1592320463242701429692077472, 1158339311156769223634640734447744, 1783702957209729441902140461938160455424, 5447268928199100257603373050876725987854119216, 31237114830378466799129128930824084710690680271414364
Offset: 0
Keywords
Examples
a(3) = 23216: [1, 15, 25] [1, 31, 90] [1, 63, 301]
Programs
-
Mathematica
a[n_]:=Permanent[Table[StirlingS2[i+4, j], {i, n}, {j, n}]]; Join[{1}, Array[a, 12]] -
PARI
a(n) = matpermanent(matrix(n, n, i, j, stirling(i+4,j,2))); \\ Michel Marcus, Feb 16 2025