|
Search: id:A065443
|
|
|
| A065443 |
|
Decimal expansion of Sum_{k=1..inf} 1/(2^k-1)^2. |
|
+0
3
|
|
| 1, 1, 3, 7, 3, 3, 8, 7, 3, 6, 3, 4, 4, 1, 9, 6, 5, 9, 6, 6, 9, 6, 9, 1, 3, 3, 6, 8, 3, 0, 1, 3, 4, 7, 5, 8, 3, 8, 3, 0, 8, 4, 9, 3, 0, 9, 8, 1, 3, 8, 8, 2, 8, 8, 2, 0, 7, 0, 4, 4, 9, 3, 3, 1, 0, 4, 6, 4, 9, 3, 8, 6, 2, 5, 2, 0, 4, 0, 8, 9, 9, 8, 0, 0, 0, 5, 4, 0, 5, 0, 9, 0, 4, 2, 3, 5, 1, 3, 1, 1, 8, 4, 0, 3, 6
(list; cons; graph; listen)
|
|
|
OFFSET
|
1,3
|
|
|
REFERENCES
|
S. R. Finch, Mathematical Constants, Cambridge, 2003, pp. 354-361.
|
|
LINKS
|
Harry J. Smith, Table of n, a(n) for n=1,...,2000
S. R. Finch, Digital Search Tree Constants
Eric Weisstein's World of Mathematics, Tree Searching
|
|
EXAMPLE
|
1.137338736...
|
|
MATHEMATICA
|
RealDigits[ NSum[1/(2^k - 1)^2, {k, 1, Infinity}, PrecisionGoal -> 40, AccuracyGoal -> 40, WorkingPrecision -> 500, NSumTerms -> 50, NSumExtraTerms -> 50]][[1]].
|
|
PROGRAM
|
(PARI) { default(realprecision, 2080); x=suminf(k=1, 1/(2^k - 1)^2); for (n=1, 2000, d=floor(x); x=(x-d)*10; write("b065443.txt", n, " ", d)) } [From Harry J. Smith (hjsmithh(AT)sbcglobal.net), Oct 19 2009]
|
|
CROSSREFS
|
Cf. A078075.
Sequence in context: A010623 A066065 A145511 this_sequence A117190 A113584 A111383
Adjacent sequences: A065440 A065441 A065442 this_sequence A065444 A065445 A065446
|
|
KEYWORD
|
nonn,cons
|
|
AUTHOR
|
N. J. A. Sloane (njas(AT)research.att.com), Nov 18 2001
|
|
EXTENSIONS
|
More terms and Mathematica program from Peter Bertok (peter(AT)bertok.com), Dec 04 2001
|
|
|
Search completed in 0.002 seconds
|
