A147864 Decimal expansion of smallest positive solution to x^4 = tan x.

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

Offset: 1

Author

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

Keywords

• nonn
• cons

Crossrefs

Cf. A115365, A147862-A147868.

Programs

Mathematica

RealDigits[x/.FindRoot[x^4==Tan[x],{x,4.7,4.72}, WorkingPrecision-> 120]][[1]] (* Harvey P. Dale, Dec 15 2011 *)