A384594 a(n) = permanent of the n X n circulant matrix with (row 1) = (F(2), F(3), ..., F(n+1)), where F = A000045 (Fibonacci numbers).
1, 1, 5, 54, 1689, 126379, 24431584, 11866142075, 14794067672433, 47379803431959808, 392931276153375379253, 8465684295123427342668831, 475511457476096446534113500160, 69772090836124641206618567332180231, 26784700757594331263875776507073783052317
Offset: 0
Keywords
Programs
-
Mathematica
z = 14; v[n_] := Table[Fibonacci[k], {k, 2, n + 1}]; u[n_] := Table[RotateRight[#, k - 1], {k, 1, Length[#]}] &[v[n]]; Table[Permanent[u[n]], {n, 1, z}]