A392679 a(n) is the permanent of an n X n circulant matrix whose first row is given by the first n cube numbers 0, 1, ..., (n-1)^3.

1, 0, 1, 513, 543908, 1199444500, 5385515948772, 48652959927554325, 824226474957656292928, 23380465445249384396260368, 1017148143575174098003758617600, 64774199420138979827742196838391625, 5886752952942633823627471414110768054528, 746719128243209696417240109710609290312373364

Offset

0,4

Links

Table of n, a(n) for n=0..13.

Eric Weisstein's World of Mathematics, Circulant Matrix.

Example

a(2) = 1:
  [0, 1]
  [1, 0]
a(3) = 513:
  [0, 1, 8]
  [8, 0, 1]
  [1, 8, 0]

Mathematica

a[n_]:=Permanent[Table[RotateRight[Range[0, n-1]^3, i], {i, 0, n-1}]]; Join[{1}, Array[a, 13]]

Crossrefs

Cf. A000578, A118709 (determinant).

Sequence in context: A236431 A384935 A118709 * A296145 A283369 A103351

Adjacent sequences: A392676 A392677 A392678 * A392680 A392681 A392682

Keyword

nonn

Author

Stefano Spezia, Feb 21 2026

Status

approved