A358642 - OEIS

%I #10 Nov 27 2022 10:39:21

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

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

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

%N Decimal expansion of the largest real solution of 2*x = 2 + log(5*x - 1).

%H Joerg Bruedern and Trevor D. Wooley, <a href="https://arxiv.org/abs/2211.10387">Partitio Numerorum: sums of a prime and a number of k-th powers</a>, arXiv:2211.10387 [math.NT], 2022, see p. 2.

%H <a href="/index/Tra#transcendental">Index entries for transcendental numbers</a>.

%e 2.1346933843229215389462688564988458045653403...

%t First[RealDigits[Last[x/.NSolve[2x==2+Log[5x-1],x,94]]]]

%Y Cf. A358641 (smallest).

%K nonn,cons

%O 1,1

%A _Stefano Spezia_, Nov 24 2022