login
This site is supported by donations to The OEIS Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A019425 Continued fraction for tan(1/2). 6
0, 1, 1, 4, 1, 8, 1, 12, 1, 16, 1, 20, 1, 24, 1, 28, 1, 32, 1, 36, 1, 40, 1, 44, 1, 48, 1, 52, 1, 56, 1, 60, 1, 64, 1, 68, 1, 72, 1, 76, 1, 80, 1, 84, 1, 88, 1, 92, 1, 96, 1, 100, 1, 104, 1, 108, 1, 112, 1, 116, 1, 120, 1, 124, 1, 128, 1, 132, 1, 136, 1, 140, 1, 144, 1, 148, 1, 152, 1, 156, 1 (list; graph; refs; listen; history; text; internal format)
OFFSET

0,4

LINKS

Harry J. Smith, Table of n, a(n) for n = 0..20000

Dan Romik, The dynamics of Pythagorean Triples, Trans. Amer. Math. Soc. 360 (2008), 6045-6064.

G. Xiao, Contfrac

Index entries for continued fractions for constants

FORMULA

a(n) = n - 1/2 - (n-3/2)*(-1)^n + binomial(1,n) - 2*binomial(0,n). - Paul Barry, Oct 25 2007

From Philippe Deléham, Feb 10 2009: (Start)

a(n) = 2*a(n-2) - a(n-4), n>=6.

G.f.: (x + x^2 + 2*x^3 - x^4 + x^5)/(1-x^2)^2. (End)

EXAMPLE

0.546302489843790513255179465... = 0 + 1/(1 + 1/(1 + 1/(4 + 1/(1 + ...)))). - Harry J. Smith, Jun 13 2009

MATHEMATICA

Join[{0, 1}, LinearRecurrence[{0, 2, 0, -1}, {1, 4, 1, 8}, 100]] (* Vincenzo Librandi, Jan 03 2016 *)

PROG

(PARI) { allocatemem(932245000); default(realprecision, 85000); x=contfrac(tan(1/2)); for (n=0, 20000, write("b019425.txt", n, " ", x[n+1])); } \\ Harry J. Smith, Jun 13 2009

(MAGMA) [0, 1] cat [n-1/2-(n-3/2)*(-1)^n+Binomial(1, n)- 2*Binomial(0, n): n in [2..80]]; // Vincenzo Librandi, Jan 03 2016

CROSSREFS

Cf. A161011 (decimal expansion).

Sequence in context: A318445 A158496 A265722 * A255242 A305834 A295786

Adjacent sequences:  A019422 A019423 A019424 * A019426 A019427 A019428

KEYWORD

nonn,cofr

AUTHOR

David W. Wilson

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
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified October 15 00:14 EDT 2019. Contains 328025 sequences. (Running on oeis4.)