A384079 a(n) = permanent of the n X n circulant matrix with (row 1) = (F(0), F(1), ..., F(n-1)), where F = A000045 (Fibonacci numbers).
1, 0, 1, 2, 34, 877, 70400, 13131404, 6425063793, 7943767996608, 25443254098886314, 210703114432644635021, 4542702757904484984146944, 255390683442241619390980497544, 37530368819103589103825830619476133, 14431488687735756287625931644915850256384
Offset: 0
Keywords
Programs
-
Mathematica
z = 16; v[n_] := Table[Fibonacci[k], {k, 0, n - 1}]; u[n_] := Table[RotateRight[#, k - 1], {k, 1, Length[#]}] &[v[n]] Table[Simplify[Permanent[u[n]]], {n, 1, z}]
Extensions
a(0)=1 prepended by Alois P. Heinz, Jun 27 2025