%I #17 Sep 01 2023 04:10:19
%S 8,6,2,3,8,9,7,8,3,9,4,7,3,8,4,0,4,8,6,4,0,8,0,0,2,4,6,0,8,6,7,5,1,1,
%T 2,8,1,0,8,5,3,2,9,6,3,6,2,4,5,5,0,6,1,5,2,6,1,9,5,8,4,5,2,9,1,7,9,3,
%U 2,0,2,7,5,8,9,2,3,4,7,8,6,0,0,9,7,2,5
%N Decimal expansion of the central column (converted to base 10) of rule-30 1-D cellular automaton, when started from a single ON cell.
%C This constant is mentioned in Wolfram (2019 and 2022).
%C It is created by treating the central column values (A051023) as binary digits to the right of the radix point and converting the result to base 10.
%D Stephen Wolfram, Twenty Years of A New Kind of Science, Wolfram Media, 2022, p. 290.
%H Paolo Xausa, <a href="/A365254/b365254.txt">Table of n, a(n) for n = 0..10000</a>
%H Stephen Wolfram, <a href="https://writings.stephenwolfram.com/2019/10/announcing-the-rule-30-prizes/">Announcing the Rule 30 Prizes</a>, Stephen Wolfram Writings, 2019.
%H <a href="/index/Ce#cell">Index entries for sequences related to cellular automata</a>
%e 0.862389783947384048640800246086751128108532963624550...
%t Take[First[RealDigits[FromDigits[{CellularAutomaton[30,{{1},0},{700,{{0}}}],0},2]]],200]
%Y Cf. A051023, A070950.
%K nonn,cons,base
%O 0,1
%A _Paolo Xausa_, Aug 29 2023