This site is supported by donations to The OEIS Foundation.

The October issue of the Notices of the Amer. Math. Soc. has an article about the OEIS.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A197733 Decimal expansion of 2*Pi/(1+Pi). 3
 1, 5, 1, 7, 0, 9, 3, 9, 8, 5, 9, 8, 9, 5, 5, 2, 2, 9, 0, 6, 8, 8, 8, 6, 1, 3, 7, 8, 0, 8, 9, 7, 8, 5, 7, 2, 8, 2, 7, 6, 8, 5, 2, 7, 3, 1, 2, 8, 1, 0, 6, 1, 9, 9, 3, 3, 3, 7, 9, 7, 6, 4, 2, 7, 5, 6, 5, 0, 9, 6, 2, 7, 4, 2, 0, 1, 9, 1, 4, 7, 5, 2, 6, 4, 1, 2, 6, 6, 3, 4, 8, 0, 3, 0, 7, 1, 1, 5, 4 (list; constant; graph; refs; listen; history; text; internal format)
 OFFSET 1,2 COMMENTS Least x>0 such that sin(bx)=cos(cx) (and also sin(cx)=cos(bx)), where b=1/4 and c=Pi/4; see the Mathematica program for a graph and A197682 for a discussion and guide to related sequences. Equals the harmonic mean of 1 and Pi. - Stanislav Sykora, Apr 11 2016 LINKS EXAMPLE 1.51709398598955229068886137808978572827685273... MATHEMATICA b = 1/4; c = Pi/4; t = x /. FindRoot[Sin[b*x] == Cos[c*x], {x, 1.517, 1.518}] N[Pi/(2*b + 2*c), 110] RealDigits[%]  (* A197733 *) Simplify[Pi/(2*b + 2*c)] Plot[{Sin[b*x], Cos[c*x]}, {x, 0, Pi/2}] PROG (PARI) 2*Pi/(1+Pi) \\ Michel Marcus, Apr 11 2016 (MATLAB) 2*pi/(1+pi) \\ Altug Alkan, Apr 11 2016 CROSSREFS Cf. A074950 (harmonic mean of Pi and e), A197682. Sequence in context: A261721 A275490 A052345 * A241018 A300711 A111008 Adjacent sequences:  A197730 A197731 A197732 * A197734 A197735 A197736 KEYWORD nonn,cons AUTHOR Clark Kimberling, Oct 17 2011 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.

Last modified September 25 20:53 EDT 2018. Contains 315425 sequences. (Running on oeis4.)