login

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

A076187
Decimal expansion of Sum_{k>=0} 1/2^(k!).
4
1, 2, 6, 5, 6, 2, 5, 0, 5, 9, 6, 0, 4, 6, 4, 4, 7, 7, 5, 3, 9, 0, 6, 2, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 7, 5, 2, 3, 1, 6, 3, 8, 4, 5, 2, 6, 2, 6, 4, 0, 0, 5, 0, 9, 9, 9, 9, 1, 3, 8, 3, 8, 2, 2, 2, 3, 7, 2, 3, 3, 8, 0, 3, 9, 4, 5, 9, 5, 6, 3, 3, 4, 1, 3, 6, 0, 1, 3, 7, 6, 5, 6, 0, 1, 0, 9, 2, 0, 1, 8, 1, 8
OFFSET
1,2
FORMULA
Equals Sum_{k>=0} 1/A050923(k).
Equals A092874 plus 0.5. [R. J. Mathar, Sep 08 2008]
EXAMPLE
1.2656250596046447753906250000000000007...
MATHEMATICA
digits = 105; NSum[ 1/2^k!, {k, 0, 12} , WorkingPrecision -> digits] // RealDigits[#, 10, digits]& // First (* Jean-François Alcover, Mar 04 2013 *)
RealDigits[Total[1/2^Range[0, 10]!], 10, 120][[1]] (* Harvey P. Dale, Oct 16 2024 *)
PROG
(PARI) suminf(k=0, 1/2^(k!)) \\ Michel Marcus, Feb 19 2021
CROSSREFS
Sequence in context: A245698 A053793 A371324 * A019655 A032582 A050928
KEYWORD
cons,nonn
AUTHOR
Benoit Cloitre, Nov 02 2002
STATUS
approved