# Greetings from The On-Line Encyclopedia of Integer Sequences! http://oeis.org/

Search: id:a016122
Showing 1-1 of 1

%I A016122 #15 Jul 10 2021 02:57:53
%S A016122 4,6,6,9,2,4,6,8,3,2,8,7,7,7,4,7,6,7,0,3,0,6,9,9,9,6,9,7,9,1,3,6,9,5,
%T A016122 9,9,1,1,1,3,0,9,0,4,2,0,1,9,1,2,6,0,1,9,5,1,8,7,7,6,2,8,6,6,0,6,3,0,
%U A016122 9,3,6,4,0,3,1,2,1,7,0,5,2,8,2,4,4,3,2,1,1,9,1,7,6,9,7,9,8,2,4,0
%N A016122 Decimal expansion of solution to log_10(x) = x - 4.
%H A016122 Bernard I Pietsch, <a href="http://www.sonic.net/bernard/">For more information</a>
%e A016122 4.66924683287774767030699969791369599...
%t A016122 digits = 100; x /. FindRoot[ Log[10, x] == x-4, {x, 4}, WorkingPrecision -> digits+5] // RealDigits[#, 10, digits]& // First (* _Jean-François Alcover_, Mar 05 2013 *)
%o A016122 (PARI) solve(x=4,5,10^x-10^4*x) \\ _Franklin T. Adams-Watters_, Apr 15 2006
%K A016122 cons,nonn
%O A016122 1,1
%A A016122 _N. J. A. Sloane_, Bernard I Pietsch (bernard(AT)sonic.net)
%E A016122 More terms from _Franklin T. Adams-Watters_, Apr 15 2006

# Content is available under The OEIS End-User License Agreement: http://oeis.org/LICENSE