This site is supported by donations to The OEIS Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A271570 Number of distinct eigenvalues of n X n matrices with elements {-1, 0, +1}. 2
 3, 21, 375, 24823 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,1 REFERENCES Steven E. Thornton & Robert M. Corless, The Bohemian Eigenvalue Project, Poster Presented at The International Symposium on Symbolic and Algebraic Computation (ISSAC 2016). Wilfrid Laurier University, July 19-22, 2016. LINKS Steven E. Thornton, GitHub repository for code used to generate this sequence. Steven E. Thornton & Robert M. Corless, The Bohemian Eigenvalue Project. MATHEMATICA (* Program not suitable to compute more than 3 terms *) a[n_] := Module[{r, iter}, iter = Table[{r[k], {-1, 0, 1}}, {k, 1, n^2}]; Eigenvalues /@ (Table[Table[(r[# + j]& /@ Range[n]), {j, 0, n^2 - n, n}], Sequence @@ iter // Evaluate] // Flatten[#, n^2 - 1]&) // Flatten // Union // Length]; Table[an = a[n]; Print["a(", n, ") = ", an]; an, {n, 1, 3}] (* Jean-François Alcover, Jun 17 2018 *) CROSSREFS Number of characteristic polynomials: A272658. Sequence in context: A320949 A101389 A108716 * A084620 A120603 A285380 Adjacent sequences:  A271567 A271568 A271569 * A271571 A271572 A271573 KEYWORD nonn,more,hard AUTHOR Steven E. Thornton, Jul 13 2016 STATUS approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified January 22 16:47 EST 2019. Contains 319364 sequences. (Running on oeis4.)