[go: up one dir, main page]

login
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