|
%I #9 Jul 11 2019 01:51:39
%S 9,9,9,9,3,3,6,7,3,1,3,3,2,0,1,6,7,4,0,2,2,4,9,5,5,3,6,8,8,2,7,8,6,4,
%T 9,5,2,6,6,5,5,8,2,5,4,4,2,5,8,8,7,9,2,1,2,8,5,7,6,8,6,6,8,0,4,7,5,1,
%U 5,1,4,6,2,0,4,1,0,5,2,4,8,6,5,4,6,0,1,9,7,5,2,7,1,6,7,5,0,2,8,4,7,0,3,1,7
%N Decimal expansion of (Gamma(delta)/delta)^2 where delta is the Feigenbaum bifurcation velocity constant (A006890).
%C Let c be this constant, then c - 30*gamma^2 = .0039990171004565...
%H D. Broadhurst, <a href="http://www.plouffe.fr/simon/constants/feigenbaum.txt">Feigenbaum constants to 1018 decimal places</a>
%e 9.999336731332016740224955368827864952665582544...
%t Set delta then RealDigits[(Gamma[delta]/delta)^2, 10, 110][[1]]
%Y Cf. A006890.
%K cons,nonn
%O 1,1
%A _Gerald McGarvey_, Feb 26 2005
|
