A374619 a(n) is the number of distinct values of the determinant of an n X n symmetric Toeplitz matrix having 1 on the main diagonal and all the first n-1 primes off-diagonal.
1, 1, 1, 2, 6, 22, 120, 717, 5039, 40312, 362874
Offset: 0
Links
- Wikipedia, Toeplitz Matrix.
Crossrefs
Programs
-
Mathematica
a[n_]:=CountDistinct[Table[Det[ToeplitzMatrix[Join[{1},Part[Permutations[Prime[Range[n-1]]], i]]]], {i, (n -1)!}]]; Join[{1}, Array[a, 10]]
Formula
a(n) <= (n-1)! for n > 0.