Location via proxy:   [ UP ]  
[Report a bug]   [Manage cookies]                
A271880
Decimal expansion of the probability that a random real number is evil.
4
1, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 7, 8, 3, 3, 7, 7, 7, 3, 1, 6, 2, 8, 6, 4, 7, 6, 0, 5, 5, 2, 7, 9, 4, 6, 2, 5, 9, 4, 0, 6, 5, 1, 3, 3, 3, 2, 7, 7, 5, 6, 1, 9
OFFSET
0,2
COMMENTS
A real number is said to be evil if the cumulative sum of its digits following the decimal point 'hits' the value 666. It is amazing how close this value is to 1/5 (the difference is in A271881).
LINKS
Eric Weisstein's World of Mathematics, Evil Number.
FORMULA
Equals A100061(666)/A100062(666).
EXAMPLE
0.19999999999999999999999999999999999999999999999999999999999999978337...
MATHEMATICA
RealDigits[SeriesCoefficient[(1 - x^9)/(x^10 - 10 x + 9), {x, 0, 665}], 10, 120][[1]] (* Amiram Eldar, May 24 2023 *)
PROG
(PARI) 0.0 + Vec(Ser((1-x^9)/(x^10-10*x+9), x, 666))[666]
CROSSREFS
KEYWORD
nonn,cons,base
AUTHOR
Stanislav Sykora, Apr 16 2016
STATUS
approved