OFFSET
1,2
LINKS
M. J. Mossinghoff, Small Salem Numbers
Eric Weisstein's MathWorld, Salem Constants.
Wikipedia, Salem number
EXAMPLE
1.20261674368860426111829541594861904534394983496952304368530957672645...
MATHEMATICA
c1 = {1, 0, -1, 0, 0, 0, 0, -1};
c2 = Join[c1, Reverse[Most[c1]]];
p = (x^Range[0, Length[c2]-1]).c2;
sigma4 = Root[p, x, 2];
RealDigits[sigma4, 10, 102][[1]]
CROSSREFS
KEYWORD
nonn,cons
AUTHOR
Jean-François Alcover, Jun 19 2018
STATUS
approved