A316607 Decimal expansion of the seventh smallest known Salem number.

1, 2, 3, 0, 3, 9, 1, 4, 3, 4, 4, 0, 7, 2, 2, 4, 7, 0, 2, 7, 9, 0, 1, 7, 7, 9, 3, 8, 9, 7, 5, 2, 7, 9, 0, 1, 7, 5, 6, 6, 5, 7, 4, 4, 8, 9, 6, 6, 1, 7, 5, 6, 2, 4, 1, 4, 0, 1, 9, 1, 4, 2, 3, 6, 1, 7, 2, 8, 1, 3, 4, 4, 7, 8, 5, 3, 5, 4, 5, 4, 1, 6, 7, 3, 5, 9, 8, 4, 6, 5, 1, 6, 6, 2, 4, 0, 8, 5, 2, 8, 5, 6

Offset: 1

Author

Jean-François Alcover, Jul 08 2018

Keywords

• nonn
• cons

Examples

			1.2303914344072247027901779389752790175665744896617562414019142361728...
		

Links

• M. J. Mossinghoff, Small Salem Numbers
• Eric Weisstein's MathWorld, Salem Constants.
• Wikipedia, Salem number
• Index entries for algebraic numbers, degree 10.

Crossrefs

Cf. A073011 (sigma1), A219300 (sigma2), A306078 (sigma3 ), A306079 (sigma4), A316605 (sigma5), A316606 (sigma6), A316608 (sigma8), A316609 (sigma9), A316610 (sigma10).

Programs

Mathematica

c1 = {1, 0, 0, -1, 0, -1};
c2 = Join[c1, Reverse[Most[c1]]];
p = (x^Range[0, Length[c2] - 1]).c2;
sigma7 = Root[p, x, 2];
RealDigits[sigma7, 10, 102][[1]]

PARI

polrootsreal(1 - x^3 - x^5 - x^7 + x^10)[2] \\ Charles R Greathouse IV, Feb 11 2025

Formula

p = 1 - x^3 - x^5 - x^7 + x^10.