A067359 -id:A067359 - cp's OEIS frontend

A067360 a(n) = 17^n sin(2n arctan(1/4)) or numerator of tan(2n arctan(1/4)).

8, 240, 4888, 77280, 905768, 4839120, -116593352, -4896306240, -113193708472, -1980778750800, -26710380775592, -228866364286560, 853309115549288, 91741652745294480, 2505643247965090168, 48655959795562600320, 735547895204966951048

Offset: 1

Barbara Haas Margolius (b.margolius(AT)csuohio.edu), Jan 17 2002

Note that A067360(n), A067361(n) and 17^n are primitive Pythagorean triples with hypotenuse 17^n.

Steven R. Finch, Mathematical Constants, Cambridge, 2003, pp. 430-433.

J. M. Borwein and R. Girgensohn, Addition theorems and binary expansions, Canadian J. Math. 47 (1995) 262-273.
E. Eckert, The group of primitive Pythagorean triangles, Mathematics Magazine 57 (1984) 22-27.
Steven R. Finch, Plouffe's Constant [Broken link]
Steven R. Finch, Plouffe's Constant [From the Wayback machine]
Simon Plouffe, The Computation of Certain Numbers Using a Ruler and Compass, J. Integer Seqs. Vol. 1 (1998), #98.1.3.
Index entries for linear recurrences with constant coefficients, signature (30, -289).

Cf. A067361 (17^n cos(2n arctan(1/4))).

Cf. A066770, A066771, A067358, A067359, A020888, A014498, A020892.

a[1] := 8/15; for n from 1 to 40 do a[n+1] := (8/15+a[n])/(1-8/15*a[n]):od: seq(abs(numer(a[n])), n=1..40);# a[n]=tan(2n arctan(1/4))

Table[Tan[2n ArcTan[1/4]] // TrigToExp // Simplify // Numerator, {n, 1, 17} ] (* Jean-François Alcover, Jul 25 2017 *)

a(n) = 17^n sin(2n arctan(1/4)). A recursive formula for T(n) = tan(2n arctan(1/4)) is T(n+1)=(8/15+T(n))/(1-8/15*T(n)). Unsigned a(n) is the absolute value of numerator of T(n).
Conjectures from Colin Barker, Jul 25 2017: (Start)
G.f.: 8*x / (1 - 30*x + 289*x^2).
a(n) = i*((15 - 8*i)^n - (15 + 8*i)^n)/2 where i=sqrt(-1).
a(n) = 30*a(n-1) - 289*a(n-2) for n>2.
(End)

A067361 a(n) = 17^ncos(2n*arctan(1/4)) or denominator of tan(2narctan(1/4)).

Original entry on oeis.org

15, 161, 495, -31679, -1093425, -23647519, -393425745, -4968639359, -35359140465, 375162560801, 21473668418415, 535788072480961, 9867752001506895, 141189807098209121, 1383913884510780975, 713562283940993281, -378544244105385903345

Offset: 1

Barbara Haas Margolius, (b.margolius(AT)csuohio.edu), Jan 17 2002

Note that A067360(n), A067361(n) and 17^n are primitive Pythagorean triples with hypotenuse 17^n.

Steven R. Finch, Mathematical Constants, Cambridge, 2003, pp. 430-433.

J. M. Borwein and R. Girgensohn, Addition theorems and binary expansions, Canadian J. Math. 47 (1995) 262-273.
E. Eckert, The group of primitive Pythagorean triangles, Mathematics Magazine 57 (1984) 22-27.
Steven R. Finch, Plouffe's Constant [Broken link]
Steven R. Finch, Plouffe's Constant [From the Wayback machine]
Simon Plouffe, The Computation of Certain Numbers Using a Ruler and Compass, J. Integer Seqs. Vol. 1 (1998), #98.1.3.
Index entries for linear recurrences with constant coefficients, signature (30, -289).

Cf. A067360 (17^n sin(2n arctan(1/4))).

Cf. A066770, A066771, A067358, A067359, A020888, A014498, A020892.

a[1] := 8/15; for n from 1 to 40 do a[n+1] := (8/15+a[n])/(1-8/15*a[n]):od: seq(abs(denom(a[n])), n=1..40);# a[n]=tan(2n arctan(1/4))

Table[t = Tan[2 n ArcTan[1/4]] // TrigToExp // Simplify; Sign[t] * Denominator[t], {n, 1, 17}] (* Jean-François Alcover, Jul 25 2017 *)

a(n) = 17^n*cos(2*n*arctan(1/4)).
A recursive formula for T(n) = tan(2*n*arctan(1/4)) is T(n+1) = (8/15+T(n))/(1-8/15*T(n)). Unsigned a(n) is the absolute value of denominator of T(n). [And a(n) = 17^n*cos(n*arctan(8/15)). - Peter Luschny, Sep 29 2019]
From Colin Barker, Jul 25 2017: (Start)
G.f.: x*(15 - 289*x) / (1 - 30*x + 289*x^2).
a(n) = ((15 - 8*i)^n + (15 + 8*i)^n)/2 where i=sqrt(-1).
a(n) = 30*a(n-1) - 289*a(n-2) for n>2. (End)
a(n) = Re((8 + 15*i)^n) = Re((4 + i)^(2*n)) = (1/2)*V(2*n,P = 8,Q = 17), where V(n,P,Q) denotes the Lucas sequence of the second kind and i=sqrt(-1). - Peter Bala, Sep 24 2019

A067358 Imaginary part of (5+12i)^n.

Original entry on oeis.org

0, 12, 120, -828, -28560, -145668, 3369960, 58317492, 13651680, -9719139348, -99498527400, 647549275812, 23290743888720, 123471611274972, -2701419604443960, -47880898349909868, -22269070348069440, 7869181117654073292, 82455284065364468280, -505338768229893703548

Offset: 0

Barbara Haas Margolius, (b.margolius(AT)csuohio.edu), Jan 17 2002

Also 13^n sin(2n arctan(2/3)) or numerator of tan(2n arctan(2/3)).

Note that a(n), A067359(n) and 13^n are primitive Pythagorean triples with hypotenuse 13^n.

Steven R. Finch, Mathematical Constants, Cambridge, 2003, pp. 430-433.

J. M. Borwein and R. Girgensohn, Addition theorems and binary expansions, Canadian J. Math. 47 (1995) 262-273.
E. Eckert, The group of primitive Pythagorean triangles, Mathematics Magazine 57 (1984) 22-27.
Steven R. Finch, Plouffe's Constant [Broken link]
Steven R. Finch, Plouffe's Constant [From the Wayback machine]
Simon Plouffe, The Computation of Certain Numbers Using a Ruler and Compass, J. Integer Seqs. Vol. 1 (1998), #98.1.3.
Index entries for linear recurrences with constant coefficients, signature (10,-169).

Cf. A067359 (13^n cos(2n arctan(2/3))).

Cf. A066770, A066771, A067360, A067361, A020888, A014498, A020892.

a[1] := 12/5; for n from 1 to 40 do a[n+1] := (12/5+a[n])/(1-12/5*a[n]):od: seq(abs(numer(a[n])), n=1..40);# a[n]=tan(2n arctan(2/3))

Im[(5 + 12*I)^Range[0, 24]] (* or *)
LinearRecurrence[{10, -169}, {0, 12}, 25] (* Paolo Xausa, Apr 22 2024 *)

PARI
```
a(n)=imag((5+12*I)^n)
```

G.f.: 12*x/(1-10*x+169*x^2). a(n)=10*a(n-1)-169*a(n-2). - Michael Somos, Jun 27 2002

Better description from Michael Somos, Jun 27 2002

cp's OEIS Frontend

A067360 a(n) = 17^n sin(2n arctan(1/4)) or numerator of tan(2n arctan(1/4)).

Views

Author

Keywords

Comments

References

Links

Crossrefs

Programs

Maple

Mathematica

Formula

A067361 a(n) = 17^ncos(2n*arctan(1/4)) or denominator of tan(2narctan(1/4)).

Views

Author

Keywords

Comments

References

Links

Crossrefs

Programs

Maple

Mathematica

Formula

A067358 Imaginary part of (5+12i)^n.

Views

Author

Keywords

Comments

References

Links

Crossrefs

Programs

Maple

Mathematica

PARI

Formula

Extensions

cp's OEIS Frontend

A067360 a(n) = 17^n sin(2n arctan(1/4)) or numerator of tan(2n arctan(1/4)).

Views

Author

Keywords

Comments

References

Links

Crossrefs

Programs

Maple

Mathematica

Formula

A067361 a(n) = 17^n*cos(2*n*arctan(1/4)) or denominator of tan(2*n*arctan(1/4)).

Views

Author

Keywords

Comments

References

Links

Crossrefs

Programs

Maple

Mathematica

Formula

A067358 Imaginary part of (5+12i)^n.

Views

Author

Keywords

Comments

References

Links

Crossrefs

Programs

Maple

Mathematica

PARI

Formula

Extensions

A067361 a(n) = 17^ncos(2n*arctan(1/4)) or denominator of tan(2narctan(1/4)).