|
|
A374341
|
|
a(n) is the maximal determinant of an n X n symmetric Toeplitz matrix having 1 on the main diagonal and all the first n-1 primes off-diagonal.
|
|
6
|
|
|
1, 1, -3, 15, 259, 1608, 1582152, 157042600, 11778545664, 3336975844504, 440384712302421
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,3
|
|
LINKS
|
|
|
EXAMPLE
|
a(5) = 1608:
[1, 7, 2, 3, 5]
[7, 1, 7, 2, 3]
[2, 7, 1, 7, 2]
[3, 2, 7, 1, 7]
[5, 3, 2, 7, 1]
|
|
MATHEMATICA
|
a[n_]:=Max[Table[Det[ToeplitzMatrix[Join[{1}, Part[Permutations[Prime[Range[n-1]]], i]]]], {i, (n-1)!}]]; Join[{1}, Array[a, 10]]
|
|
CROSSREFS
|
|
|
KEYWORD
|
sign,hard,more
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|