A228777 Decimal expansion of the third smallest Pisot-Vijayaraghavan number.

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

Offset: 1

Author

R. J. Mathar, Sep 04 2013

Keywords

• nonn
• cons

Examples

			1.443268791270373107628127607386...
		

Links

• Iain Fox, Table of n, a(n) for n = 1..20000 (first 1000 terms from Vincenzo Librandi).
• Eric Weisstein's World of Mathematics, Pisot Number.
• Wikipedia, Pisot number
• Index entries for algebraic numbers, degree 5

Crossrefs

Cf. A060006, A086106, A092526.

Programs

Maple

fsolve(x^5-x^4-x^3+x^2-1,x,1.4..1.5) ;

Mathematica

Root[Function[x, x^5-x^4-x^3+x^2-1], 1] // RealDigits[#, 10, 90]& // First (* Jean-François Alcover, Feb 20 2014 *)

PARI

default(realprecision, 20080); x=solve(x=1, 2, x^5 - x^4 - x^3 + x^2 - 1); for (n=1, 20000, d=floor(x); x=(x-d)*10; write("b228777.txt", n, " ", d));  \\ Iain Fox, Oct 23 2017

Formula

A root of x^5-x^4-x^3+x^2-1.