login
A219300
Decimal expansion of the second smallest known Salem number.
15
1, 1, 8, 8, 3, 6, 8, 1, 4, 7, 5, 0, 8, 2, 2, 3, 5, 8, 8, 1, 4, 2, 9, 6, 0, 9, 5, 8, 6, 2, 9, 5, 9, 3, 5, 9, 4, 7, 0, 4, 7, 0, 4, 5, 6, 0, 0, 6, 2, 9, 0, 5, 6, 8, 8, 7, 4, 1, 4, 5, 3, 3, 7, 1, 2, 9, 1, 9, 6, 0, 6, 4, 1, 4, 0, 2, 1, 7, 4, 5, 8, 9, 4, 7, 5, 8, 3, 5, 0, 9, 8, 8, 0, 6, 7, 9, 6, 7, 7, 4, 5, 0, 8, 8, 8
OFFSET
1,3
COMMENTS
This number is algebraic of degree 18. Sequence A073011 contains the smallest known Salem number.
It is the only root r of the polynomial x^18 - x^17 + x^16 - x^15 - x^12 + x^11 - x^10 + x^9 - x^8 + x^7 - x^6 - x^3 + x^2 - x + 1 with abs(r) > 1. - Joerg Arndt, Nov 18 2012
EXAMPLE
1.188368147508223588142960958....
MATHEMATICA
RealDigits[x /. FindRoot[x^18 - x^17 + x^16 - x^15 - x^12 + x^11 - x^10 + x^9 - x^8 + x^7 - x^6 - x^3 + x^2 - x + 1 == 0, {x, 1, 2}, WorkingPrecision -> 200]][[1]]
CROSSREFS
Sequence in context: A199188 A340552 A254291 * A200686 A388584 A389400
KEYWORD
cons,nonn
AUTHOR
STATUS
approved