A384591 - OEIS

%I #7 Jul 02 2025 17:20:54

%S 1,1,2,16,265,12552,1431040,426749895,323397418338,635720375415040,

%T 3236089602490212389,42921641465456435652532,

%U 1485502760348227071906663424,134453761950835461349077548216607,31856917244136936392984483908703780290

%N a(n) = permanent of the n X n circulant matrix with (row 1) = (F(1), F(2), ..., F(n)), where F = A000045 (Fibonacci numbers).

%t z = 14;

%t v[n_] := Table[Fibonacci[k], {k, 1, n}];

%t u[n_] := Table[RotateRight[#, k - 1], {k, 1, Length[#]}] &[v[n]]

%t Table[Permanent[u[n]], {n, 1, z}]

%Y Cf. A000045, A123744 (determinant), A384080, A384313.

%K nonn

%O 0,3

%A _Clark Kimberling_, Jun 27 2025