OFFSET
1,2
LINKS
M. J. Mossinghoff, Small Salem Numbers
Eric Weisstein's MathWorld, Salem Constants.
Wikipedia, Salem number
FORMULA
p = 1 - x - x^5 + x^6 - x^9 + x^10 - x^11 + x^14 - x^15 - x^19 + x^20.
EXAMPLE
1.2326135485931210039627316948079097914115773712098310467299165820538...
MATHEMATICA
c1 = {1, -1, 0, 0, 0, -1, 1, 0, 0, -1, 1};
c2 = Join[c1, Reverse[Most[c1]]];
p = (x^Range[0, Length[c2] - 1]).c2;
sigma8 = Root[p, x, 2];
RealDigits[sigma8, 10, 102][[1]]
CROSSREFS
KEYWORD
nonn,cons
AUTHOR
Jean-François Alcover, Jul 08 2018
STATUS
approved