|
Search: id:A078665
|
|
|
| A078665 |
|
Maximum absolute value of coefficients of characteristic polynomial of M_n, the n X n matrix m_(i,j) = i mod j. |
|
+0
1
|
|
| 1, 1, 2, 5, 47, 105, 1272, 8424, 55856, 388800, 6592492, 37965600, 1573051680, 10106845824, 145938179520, 2694653982720, 18948491739696, 267048208800000, 23293245955795200, 466687809894297600, 3372079713556377600
(list; graph; listen)
|
|
|
OFFSET
|
1,3
|
|
|
EXAMPLE
|
Characteristic polynomial of M_4 is x^4 - 5*x^2 - 2*x^1 + 0*x^0.
|
|
MATHEMATICA
|
a[n_] := Max@@Abs/@CoefficientList[CharacteristicPolynomial[Table[Mod[i, j], {i, n}, {j, n}], x], x]
|
|
CROSSREFS
|
Cf. A078924.
Sequence in context: A119715 A023273 A041729 this_sequence A163666 A093552 A112266
Adjacent sequences: A078662 A078663 A078664 this_sequence A078666 A078667 A078668
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Benoit Cloitre (benoit7848c(AT)orange.fr), Dec 15 2002
|
|
|
Search completed in 0.002 seconds
|
