|
| |
|
|
A091007
|
|
Decimal expansion of Sum[ArcCot[n^2],{n,Infinity}].
|
|
0
| |
|
|
1, 4, 2, 4, 7, 4, 1, 7, 7, 8, 4, 2, 9, 9, 8, 0, 8, 8, 9, 7, 6, 1, 5, 4, 7, 8, 0, 6, 8, 8, 9, 2, 3, 4, 1, 5, 2, 8, 0, 2, 0, 6, 6, 3, 3, 4, 6, 0, 1, 8, 1, 8, 0, 4, 0, 6, 5, 7, 2, 4, 5, 7, 7, 3, 1, 3, 7, 1, 1, 3, 8, 6, 3, 0, 2, 1, 0, 3, 1, 9, 6, 5, 8, 1, 5, 4, 9, 9, 2, 0, 8, 4, 9, 8, 5, 1, 7, 6, 6, 3, 1, 1
(list; constant; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,2
|
|
|
COMMENTS
| Wilf's constant. [From Artur Jasinski (grafix(AT)csl.pl), Sep 25 2008]
|
|
|
LINKS
| Eric Weisstein's World of Mathematics, Inverse Cotangent
G. Boros, V. Moll, Sums of arctangents and some formulas of Ramanujan, Sci. Ser. A Math. Sci 11 (2005) 13-24 [MR2196063] eq. (1.3). [From R. J. Mathar (mathar(AT)strw.leidenuniv.nl), Apr 01 2010]
|
|
|
FORMULA
| Decimal expansion of transcedental number ArcCot[(1 + t)/(1 - t)]; where t=Cot[Pi Sqrt[2]/2] Tanh[Pi Sqrt[2]/2] [From Artur Jasinski (grafix(AT)csl.pl), Sep 25 2008]
|
|
|
EXAMPLE
| 1.42474177...
|
|
|
MATHEMATICA
| t = Cot[Pi Sqrt[2]/2] Tanh[Pi Sqrt[2]/2]; s = ArcCot[(1 + t)/(1 - t)]; RealDigits[N[s, 102]] [From Artur Jasinski (grafix(AT)csl.pl), Sep 25 2008]
|
|
|
CROSSREFS
| Sequence in context: A114566 A013679 A096428 * A180156 A110638 A154995
Adjacent sequences: A091004 A091005 A091006 * A091008 A091009 A091010
|
|
|
KEYWORD
| nonn,cons
|
|
|
AUTHOR
| Eric Weisstein (eric(AT)weisstein.com), Dec 13, 2003
|
| |
|
|
