This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A104140 #28 Sep 01 2024 10:26:27 %S A104140 0,4,5,7,5,7,4,9,0,5,6,0,6,7,5,1,2,5,4,0,9,9,4,4,1,9,3,4,8,9,7,6,9,3, %T A104140 8,1,5,9,9,7,4,2,2,7,1,6,1,8,6,0,8,2,7,0,3,4,0,2,6,8,7,1,9,3,8,9,5,4, %U A104140 1,6,9,4,4,3,2,6,7,7,7,5,3,9,1,4,0,6,3,2,8,8,7,0,4,7,6,7,3,9,6,9,7 %N A104140 Decimal expansion of 1 - log_10(9). %C A104140 1 - log_10(9) is the probability that 9 occurs as the first significant digit in data collections according to Benford's law (see A007524). %H A104140 <a href="/index/Be#Benford">Index entries for sequences related to Benford's law</a> %H A104140 <a href="/index/Tra#transcendental">Index entries for transcendental numbers</a> %e A104140 1 - log_10(9) = 0.0457574905606751254099441934897... %t A104140 Take[Prepend[First[RealDigits[N[1 - Log[10, 9], 120]]], 0], 101] (* _Ryan Propper_, Sep 14 2005, fixed by _Vaclav Kotesovec_, Apr 04 2020 *) %o A104140 (PARI) 1 - log(9)/log(10) \\ _Michel Marcus_, Apr 04 2020 %Y A104140 Cf. A007524. %K A104140 nonn,cons %O A104140 0,2 %A A104140 _Lekraj Beedassy_, Mar 07 2005 %E A104140 More terms from _Ryan Propper_, Sep 14 2005 %E A104140 a(100) corrected by _Georg Fischer_, Apr 04 2020