|
|
A238196
|
|
Triangle of the discriminant of the polynomials x^n + x^m - 1, where 0 < m < n.
|
|
5
|
|
|
5, -31, -23, -283, -400, -283, 3381, 3017, 3233, 2869, 49781, 61504, 91125, 33856, 49781, -870199, -811043, -830455, -816631, -836043, -776887, -17600759, -20502784, -16861591, -40960000, -16861591, -20502784, -17600759, 404197705, 384126317, 586376253
(list;
table;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
Boyd et al. mention these numbers.
|
|
LINKS
|
|
|
MATHEMATICA
|
Flatten[Table[Discriminant[x^n + x^m - 1, x], {n, 2, 9}, {m, n - 1}]]
|
|
PROG
|
(PARI) {T(n, m) = if( m<=0 || m>=n, 0, poldisc( x^n + x^m - 1))}; /* Michael Somos, Feb 24 2014 */
|
|
CROSSREFS
|
Cf. A238195 (discriminant of x^n - x^m - 1).
Cf. A238197 (discriminant of x^n + x^m + 1).
Cf. A238198 (discriminant of x^n - x^m + 1).
|
|
KEYWORD
|
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|