A249864 A special solution of X(n)^2 - 120*Y(n)^2 = 7^(2*n), n >= 0. The present sequence gives the X values.
1, 13, 289, 6877, 164641, 3943693, 94468609, 2262942877, 54207552961, 1298512176013, 31105146481249, 745106711887837, 17848622331502561, 427553951736562573, 10241820250907001409, 245337182888490470557
Offset: 0
Links
Programs
-
Magma
I:=[1,13]; [n le 2 select I[n] else 26*Self(n-1)-49*Self(n-2): n in [1..40]]; // Vincenzo Librandi, Nov 09 2014
-
Maple
f:= gfun:-rectoproc({a(n)=26*a(n-1)-49*a(n-2),a(0)=1,a(1)=13},a(n),remember): seq(f(n),n=0..50); # Robert Israel, Nov 18 2014
-
Mathematica
LinearRecurrence[{26, -49}, {1, 13} , 30] (* or *) CoefficientList[ Series[(1 - 13*x)/(1 - 26*x + (7*x)^2), {x, 0, 50}], x] (* G. C. Greubel, Dec 20 2017 *)
-
PARI
x='x+O('x^30); Vec((1 - 13*x)/(1 - 26*x + (7*x)^2)) \\ G. C. Greubel, Dec 20 2017
Formula
a(n) = (7^n)*(S(n, 26/7) - (13/7)*S(n-1, 26/7)), n >= 0, with the scaled Chebyshev S sequence 7^n*S(n, 26/7) given in A249863.
O.g.f.: (1 - 13*x)/(1 - 26*x + (7*x)^2).
a(n) = 26*a(n-1) - 49*a(n-2), a(0) = 1, a(1) = 13.
a(n) = (r^n + s^n)/2 where r,s are the roots of x^2 - 26*x + 49. - Robert Israel, Nov 18 2014
Comments