A369835 a(n) is the number of distinct values of the permanent of an n X n symmetric Toeplitz matrix using the integers 0 to n-1.

1, 1, 1, 6, 23, 119, 718, 5038, 40320, 362879

Offset

0,4

Links

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

Wikipedia, Toeplitz Matrix.

Formula

a(n) <= A000142(n).

Mathematica

a[n_] := CountDistinct[Table[Permanent[ToeplitzMatrix[Part[Permutations[Join[{0}, Range[n - 1]]], i]]], {i, n !}]]; Join[{1}, Array[a, 9]]

Prog

(Python)
from itertools import permutations
from sympy import Matrix
def A369835(n): return len({Matrix([p[i:0:-1]+p[:n-i] for i in range(n)]).per() for p in permutations(range(n))}) # Chai Wah Wu, Feb 11 2024

Crossrefs

Cf. A000142, A358326, A358327.

Cf. A369830, A369831, A369832, A369833, A369834.

Sequence in context: A120775 A013258 A013264 * A369831 A063383 A266996

Adjacent sequences: A369832 A369833 A369834 * A369836 A369837 A369838

Keyword

nonn,hard,more

Author

Stefano Spezia, Feb 03 2024

Status

approved