A097308 Chebyshev T-polynomials T(n,13) with Diophantine property.
1, 13, 337, 8749, 227137, 5896813, 153090001, 3974443213, 103182433537, 2678768828749, 69544807113937, 1805486216133613, 46873096812360001, 1216895030905226413, 31592397706723526737, 820185445343906468749, 21293229181234844660737, 552803773266762054710413
Offset: 0
Links
- Seiichi Manyama, Table of n, a(n) for n = 0..700 (terms 0..200 from Vincenzo Librandi)
- Tanya Khovanova, Recursive Sequences
- Index entries for sequences related to Chebyshev polynomials.
- Index entries for linear recurrences with constant coefficients, signature (26,-1).
Crossrefs
Cf. A097309.
Programs
-
Magma
I:=[1,13]; [n le 2 select I[n] else 26*Self(n-1)-Self(n-2): n in [1..20]]; // Vincenzo Librandi, Feb 22 2014
-
Mathematica
CoefficientList[Series[(1 - 13 x)/(1 - 26 x + x^2), {x, 0, 40}], x] (* Vincenzo Librandi, Feb 22 2014 *) LinearRecurrence[{26,-1},{1,13},20] (* Harvey P. Dale, Jul 01 2019 *)
-
PARI
Vec((1-13*x)/(1-26*x+x^2) + O(x^100)) \\ Colin Barker, Feb 20 2014
Formula
a(n) = 26*a(n-1) - a(n-2), a(-1) := 13, a(0)=1.
a(n) = T(n, 13) = (S(n, 26) - S(n-2, 26))/2 = S(n, 26) - 13*S(n-1, 26) with T(n, x), resp. S(n, x), Chebyshev's polynomials of the first, resp. second, kind. See A053120 and A049310. S(n, 26)=A097309(n).
a(n) = (ap^n + am^n)/2 with ap := 13+2*sqrt(42) and am := 13-2*sqrt(42).
a(n) = Sum_{k=0..floor(n/2)} ((-1)^k)*(n/(2*(n-k)))*binomial(n-k, k)*(2*13)^(n-2*k), n >= 1.
G.f.: (1 - 13*x)/(1 - 26*x + x^2).
a(n) = sqrt(1 + 168*A097309(n)^2), n >= 0.
a(n) = cosh(2n*arcsinh(sqrt(6))). - Herbert Kociemba, Apr 24 2008
Extensions
Additional terms from Colin Barker, Feb 20 2014
Comments