login

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

Pell equation solutions (3*b(n))^2 - 10*a(n)^2 = -1 with b(n) = A097314(n), n >= 0.
21

%I #54 Feb 25 2023 15:18:56

%S 1,37,1405,53353,2026009,76934989,2921503573,110940200785,

%T 4212806126257,159975692596981,6074863512559021,230684837784645817,

%U 8759948972303982025,332647376109766671133,12631840343198829521029,479677285665445755127969,18215105014943739865341793,691694313282196669127860165

%N Pell equation solutions (3*b(n))^2 - 10*a(n)^2 = -1 with b(n) = A097314(n), n >= 0.

%C Hypotenuses of primitive Pythagorean triples in A195616 and A195617. - _Clark Kimberling_, Sep 22 2011

%H Indranil Ghosh, <a href="/A097315/b097315.txt">Table of n, a(n) for n = 0..631</a>

%H A. J. C. Cunningham, <a href="https://archive.org/details/binomialfactoris01cunn/page/n46/mode/1up">Binomial Factorisations</a>, Vols. 1-9, Hodgson, London, 1923-1929. See Vol. 1, page xxxv.

%H Tanya Khovanova, <a href="http://www.tanyakhovanova.com/RecursiveSequences/RecursiveSequences.html">Recursive Sequences</a>

%H Giovanni Lucca, <a href="http://forumgeom.fau.edu/FG2019volume19/FG201902index.html">Integer Sequences and Circle Chains Inside a Hyperbola</a>, Forum Geometricorum (2019) Vol. 19, 11-16.

%H <a href="/index/Ch#Cheby">Index entries for sequences related to Chebyshev polynomials.</a>

%H <a href="/index/Rec#order_02">Index entries for linear recurrences with constant coefficients</a>, signature (38,-1).

%F a(n) = S(n, 38) - S(n-1, 38) = T(2*n+1, sqrt(10))/sqrt(10), with Chebyshev polynomials of the second and first kind. See A049310 for the triangle of S(n, x)= U(n, x/2) coefficients. S(-1, x) := 0 =: U(-1, x); and A053120 for the T-triangle.

%F a(n) = ((-1)^n)*S(2*n, 6*i) with the imaginary unit i and Chebyshev polynomials S(n, x) with coefficients shown in A049310.

%F G.f.: (1-x)/(1-38*x+x^2).

%F a(n) = 38*a(n-1) - a(n-2) for n > 1. - _Philippe Deléham_, Nov 18 2008

%F a(n) = sqrt(2+(19-6*sqrt(10))^(1+2*n) + (19+6*sqrt(10))^(1+2*n))/(2*sqrt(10)). - _Gerry Martens_, Jun 04 2015

%F a(n) = A078987(n) - A078987(n-1). - _R. J. Mathar_, Dec 05 2015

%F a(n) = A005668(2*n+1). - _Michael Somos_, Feb 24 2023

%e (x,y) = (3,1), (117,37), (4443,1405), ... give the positive integer solutions to x^2 - 10*y^2 = -1.

%e G.f. = 1 + 37*x + 1405*x^2 + 53353*x^3 + ... - _Michael Somos_, Feb 24 2023

%t CoefficientList[Series[(1-x)/(1-38x+x^2), {x,0,20}], x] (* _Michael De Vlieger_, Feb 04 2017 *)

%t LinearRecurrence[{38,-1}, {1,37}, 21] (* _G. C. Greubel_, Aug 01 2019 *)

%o (PARI) Vec((1-x)/(1-38*x+x^2) + O(x^20)) \\ _Michel Marcus_, Jun 04 2015

%o (Magma) I:=[1, 37]; [n le 2 select I[n] else 38*Self(n-1) - Self(n-2): n in [1..30]]; // _G. C. Greubel_, Aug 01 2019

%o (Sage) ((1-x)/(1-38*x+x^2)).series(x, 20).coefficients(x, sparse=False) # _G. C. Greubel_, Aug 01 2019

%o (GAP) a:=[1,37];; for n in [3..20] do a[n]:=38*a[n-1]-a[n-2]; od; a; # _G. C. Greubel_, Aug 01 2019

%Y Cf. A078987 (partial sums), A097314, A195616, A195617, A049310, A053120, A005668.

%Y Row 3 of array A188647.

%Y Cf. A221874.

%Y Cf. similar sequences listed in A238379.

%K nonn,easy

%O 0,2

%A _Wolfdieter Lang_, Aug 31 2004

%E Typo in recurrence formula corrected by Laurent Bonaventure (bonave(AT)free.fr), Oct 03 2010

%E More terms added by _Indranil Ghosh_, Feb 04 2017