This site is supported by donations to The OEIS Foundation.

The OEIS is looking to hire part-time people to help edit core sequences, upload scanned documents, process citations, fix broken links, etc. - Neil Sloane, njasloane@gmail.com

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A133731 Decimal expansion of goat tether length to graze half a unit field. 3
 1, 1, 5, 8, 7, 2, 8, 4, 7, 3, 0, 1, 8, 1, 2, 1, 5, 1, 7, 8, 2, 8, 2, 3, 3, 5, 0, 9, 9, 3, 3, 5, 0, 9, 1, 4, 9, 6, 8, 8, 2, 9, 2, 2, 6, 6, 4, 9, 2, 0, 9, 6, 5, 1, 1, 8, 2, 0, 6, 9, 5, 8, 8, 4, 8, 2, 0, 6, 6, 9, 8, 0, 2, 5, 5, 9, 1, 9, 6, 0, 9, 3, 1, 9, 9, 3, 2, 1, 6, 1, 0, 7, 3, 0, 8, 6, 0, 4, 3, 8, 1, 7, 5, 9, 6 (list; constant; graph; refs; listen; history; text; internal format)
 OFFSET 1,3 REFERENCES M. Fraser, A tale of two goats, Math. Mag., 55 (1982), 221-227. Has extensive bibliography. [From N. J. A. Sloane, Jul 12 2011] LINKS Gerd Lamprecht, A133731=cos(A173201/2)*2; 10000 digits [From Gerd Lamprecht (gerdlamprecht(AT)googlemail.com), Feb 12 2010] Gerd Lamprecht, Iterationsrechner mit Algorithmus [From Gerd Lamprecht (gerdlamprecht(AT)googlemail.com), Feb 12 2010] Eric Weisstein's World of Mathematics, Goat Problem EXAMPLE 1.1587284730181215178... A133731 = cos(A173201=1.9056957293.../2)*2. - Gerd Lamprecht (gerdlamprecht(AT)googlemail.com), Feb 12 2010 MATHEMATICA A173201 = x /. FindRoot[(-x*Cos[x] + Sin[x] - Pi/2)/(Sin[x]*x), {x, 1}, WorkingPrecision -> 105]; RealDigits[2*Cos[A173201/2] ][[1]] (* Jean-François Alcover, Oct 31 2012 *) CROSSREFS Sequence in context: A070371 A199444 A005120 * A021067 A047914 A005480 Adjacent sequences:  A133728 A133729 A133730 * A133732 A133733 A133734 KEYWORD nonn,cons AUTHOR Eric W. Weisstein, Sep 21 2007 STATUS approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent | More pages
The OEIS Community | Maintained by The OEIS Foundation Inc.