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

%I #6 Jun 09 2021 05:34:23

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

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

%U 6,7,2,5,7,9,8,3,8,5,8,3,8,0,4,3,9,2,2,4,8,2,4,7,0,5,5,7,8,4,7,3

%N Decimal expansion of smallest positive solution to x^7 = tan x.

%e 1.10211306720501101180409243264204757999956054042708...

%t RealDigits[x /. FindRoot[Tan[x] == x^7, {x, 1}, WorkingPrecision -> 120], 10, 100][[1]] (* _Amiram Eldar_, Jun 09 2021 *)

%Y Cf. A115365, A147862, A147863, A147864, A147865, A147866, A147868.

%K nonn,cons

%O 1,4

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