A147866 Decimal expansion of smallest positive solution to x^6 = tan x.

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

Offset: 1

Author

Grover Hughes (ghughes(AT)magtel.com), Nov 16 2008

Keywords

• nonn
• cons

Crossrefs

Cf. A147862-A147868.

Programs

Mathematica

RealDigits[x/.FindRoot[x^6==Tan[x],{x,1},WorkingPrecision->120]][[1]] (* Harvey P. Dale, Oct 09 2015 *)