|
|
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
(list;
constant;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
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
|
|
|
FORMULA
|
|
|
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
|
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|