Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.
%I #5 Jul 15 2014 08:09:56
%S 3,7,6,6,7,4,4,7,4,9,7,7,2,8,4,4,9,8,4,6,9,8,1,4,8,1,1,2,8,3,1,3,0,8,
%T 0,8,5,7,0,4,1,2,9,5,2,9,9,9,4,4,3,8,6,5,0,9,9,9,2,6,9,5,7,9,5,3,3,4,
%U 0,2,9,5,6,0,9,9,5,6,8,7,1,2,1,4,6,5,4,6,1,5,7,6,9,7,0,8,4,1,5,3,0,2,2,2,7,6
%N Decimal expansion of the root of the equation r^(2*r-1) = (r+1)^(2*r).
%C Constant is associated with A245242.
%e 0.3766744749772844984698148112831308085704129529994...
%t RealDigits[r/.FindRoot[r^(2*r-1) == (r+1)^(2*r), {r, 1/2}, WorkingPrecision->250], 10, 200][[1]]
%Y Cf. A245242, A220359, A237421, A245260.
%K nonn,cons
%O 0,1
%A _Vaclav Kotesovec_, Jul 15 2014