cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

Showing 1-4 of 4 results.

A276600 Values of m such that m^2 + 6 is a triangular number (A000217).

Original entry on oeis.org

0, 2, 3, 7, 15, 20, 42, 88, 117, 245, 513, 682, 1428, 2990, 3975, 8323, 17427, 23168, 48510, 101572, 135033, 282737, 592005, 787030, 1647912, 3450458, 4587147, 9604735, 20110743, 26735852, 55980498, 117214000, 155827965, 326278253, 683173257, 908231938
Offset: 1

Views

Author

Colin Barker, Sep 07 2016

Keywords

Comments

2*a(n+2) gives the y members of all positive solutions (x(n), y(n)), proper and improper, of the Pell equation x^2 - 2*y^2 = 7^2, n >= 0. The corresponding x members are x(n) = A106525(n). - Wolfdieter Lang, Sep 29 2016

Examples

			7 is in the sequence because 7^2 + 6 = 55, which is a triangular number.
		

Crossrefs

Cf. A001109 (k=0), A106328 (k=1), A077241 (k=2), A276598 (k=3), A276599 (k=5), A276601 (k=9), A276602 (k=10), where k is the value added to n^2.

Programs

  • Magma
    I:=[0,2,3,7,15,20]; [n le 6 select I[n] else 6*Self(n-3) - Self(n-6): n in [1..41]]; // G. C. Greubel, Sep 15 2021
    
  • Mathematica
    LinearRecurrence[{0,0,6,0,0,-1}, {0,2,3,7,15,20}, 41] (* G. C. Greubel, Sep 15 2021 *)
  • PARI
    concat(0, Vec(x^2*(2+3*x+7*x^2+3*x^3+2*x^4)/(1-6*x^3+x^6) + O(x^40)))
    
  • Sage
    def A276600_list(prec):
        P. = PowerSeriesRing(ZZ, prec)
        return P( x^2*(2+3*x+7*x^2+3*x^3+2*x^4)/(1-6*x^3+x^6) ).list()
    a=A276600_list(41); a[1:] # G. C. Greubel, Sep 15 2021

Formula

a(n) = 6*a(n-3) - a(n-6) for n>6.
G.f.: x^2*(2 + 3*x + 7*x^2 + 3*x^3 + 2*x^4)/(1 - 6*x^3 + x^6).
From Wolfdieter Lang, Sep 29 2016: (Start)
Trisection:
a(2+3*n) = 15*S(n-1,6) - 2*S(n-2,6) = A275794(n),
a(3+3*n) = 20*S(n-1,6) - 3*S(n-2,6) = A275796(n),
a(4+3*n) = 7*(6*S(n-1,6) - S(n-2,6)) = 7*A001109(n+1) for n >= 0, with the Chebyshev polynomials S(n, 6) = A001109(n+1), n >= -1, with S(-2, 6) = -1.
(End)

A276598 Values of m such that m^2 + 3 is a triangular number (A000217).

Original entry on oeis.org

0, 5, 30, 175, 1020, 5945, 34650, 201955, 1177080, 6860525, 39986070, 233055895, 1358349300, 7917039905, 46143890130, 268946300875, 1567533915120, 9136257189845, 53250009223950, 310363798153855, 1808932779699180, 10543232880041225, 61450464500548170
Offset: 1

Views

Author

Colin Barker, Sep 07 2016

Keywords

Examples

			5 is in the sequence because 5^2 + 3 = 28, which is a triangular number.
		

Crossrefs

Cf. A001109 (k=0), A106328 (k=1), A077241 (k=2), A276599 (k=5), A276600 (k=6), A276601 (k=9), A276602 (k=10), where k is the value added to n^2.
Cf. A328791 (the resulting triangular numbers).

Programs

  • Magma
    [n le 2 select 5*(n-1) else 6*Self(n-1) - Self(n-2): n in [1..31]]; // G. C. Greubel, Sep 15 2021
    
  • Mathematica
    CoefficientList[Series[5*x/(1 - 6*x + x^2), {x, 0, 20}], x] (* Wesley Ivan Hurt, Sep 07 2016 *)
    LinearRecurrence[{6,-1},{0,5},30] (* Harvey P. Dale, Apr 26 2019 *)
    (5/2)*Fibonacci[2*Range[30] -2, 2] (* G. C. Greubel, Sep 15 2021 *)
  • PARI
    concat(0, Vec(5*x^2/(1-6*x+x^2) + O(x^30)))
    
  • PARI
    a(n)=([0,1;-1,6]^n*[-5;0])[1,1] \\ Charles R Greathouse IV, Sep 07 2016
    
  • Sage
    [(5/2)*lucas_number1(2*n-2, 2, -1) for n in (1..30)] # G. C. Greubel, Sep 15 2021

Formula

a(n) = 5*A001109(n-1).
a(n) = 5*( (3 - 2*sqrt(2))*(3 + 2*sqrt(2))^n - (3 + 2*sqrt(2))*(3 - 2*sqrt(2))^n )/(4*sqrt(2)).
a(n) = 6*a(n-1) - a(n-2) for n>2.
G.f.: 5*x^2 / (1-6*x+x^2).
a(n) = (5/2)*A000129(2*n-2). - G. C. Greubel, Sep 15 2021

A276599 Values of n such that n^2 + 5 is a triangular number (A000217).

Original entry on oeis.org

1, 4, 10, 25, 59, 146, 344, 851, 2005, 4960, 11686, 28909, 68111, 168494, 396980, 982055, 2313769, 5723836, 13485634, 33360961, 78600035, 194441930, 458114576, 1133290619, 2670087421, 6605301784, 15562409950, 38498520085, 90704372279, 224385818726
Offset: 1

Views

Author

Colin Barker, Sep 07 2016

Keywords

Examples

			4 is in the sequence because 4^2 + 5 = 21, which is a triangular number.
		

Crossrefs

Cf. A001109 (k=0), A106328 (k=1), A077241 (k=2), A276598 (k=3), A276600 (k=6), A276601 (k=9), A276602 (k=10), where k is the value added to n^2.

Programs

  • Magma
    I:=[1,4,10,25]; [n le 4 select I[n] else 6*Self(n-2) - Self(n-4): n in [1..31]]; // G. C. Greubel, Sep 15 2021
    
  • Mathematica
    CoefficientList[Series[(1+x)*(1+3*x+x^2)/((1+2*x-x^2)*(1-2*x-x^2)), {x, 0, 30}], x] (* Wesley Ivan Hurt, Sep 07 2016 *)
    LinearRecurrence[{0,6,0,-1},{1,4,10,25},30] (* Harvey P. Dale, Feb 13 2017 *)
  • PARI
    Vec(x*(1+x)*(1+3*x+x^2)/((1+2*x-x^2)*(1-2*x-x^2)) + O(x^40))
    
  • PARI
    a(n)=([0,1;-1,6]^(n\2)*if(n%2,[1;10],[-1;4]))[1,1] \\ Charles R Greathouse IV, Sep 07 2016
    
  • Sage
    def P(n): return lucas_number1(n, 2, -1)
    [(1/4)*(P(n+2) + P(n+1) + (-1)^n*(3*P(n) - 7*P(n-1))) for n in (1..30)] # G. C. Greubel, Sep 15 2021

Formula

a(n) = 6*a(n-2) - a(n-4) for n>4.
G.f.: x*(1+x)*(1+3*x+x^2) / ((1+2*x-x^2)*(1-2*x-x^2)).
a(n) = (1/4)*(P(n+2) + P(n+1) + (-1)^n*(3*P(n) - 7*P(n-1))), where P(n) = A000129(n). - G. C. Greubel, Sep 15 2021

A276602 Values of k such that k^2 + 10 is a triangular number (A000217).

Original entry on oeis.org

0, 9, 54, 315, 1836, 10701, 62370, 363519, 2118744, 12348945, 71974926, 419500611, 2445028740, 14250671829, 83059002234, 484103341575, 2821561047216, 16445262941721, 95850016603110, 558654836676939, 3256079003458524, 18977819184074205, 110610836100986706
Offset: 1

Views

Author

Colin Barker, Sep 07 2016

Keywords

Examples

			9 is in the sequence because 9^2+10 = 91, which is a triangular number.
		

Crossrefs

Cf. A001109 (k=0), A106328 (k=1), A077241 (k=2), A276598 (k=3), A276599 (k=5), A276600 (k=6), A276601 (k=9), where k is the value added to n^2.

Programs

  • Magma
    [n le 2 select 9*(n-1) else 6*Self(n-1) - Self(n-2): n in [1..31]]; // G. C. Greubel, Sep 15 2021
    
  • Mathematica
    CoefficientList[Series[9*x/(1 - 6*x + x^2), {x, 0, 20}], x] (* Wesley Ivan Hurt, Sep 07 2016 *)
    (9/2)*Fibonacci[2*(Range[30] -1), 2] (* G. C. Greubel, Sep 15 2021 *)
  • PARI
    concat(0, Vec(9*x^2/(1-6*x+x^2) + O(x^30)))
    
  • Sage
    [(9/2)*lucas_number1(2*n-2, 2, -1) for n in (1..30)] # G. C. Greubel, Sep 15 2021

Formula

a(n) = (9/(4*sqrt(2))*( (3 - 2*sqrt(2))*(3 + 2*sqrt(2))^n - (3 + 2*sqrt(2))*(3 - 2*sqrt(2))^n) ).
a(n) = 9*A001109(n-1).
a(n) = 6*a(n-1) - a(n-2) for n>2.
G.f.: 9*x^2 / (1-6*x+x^2).
a(n) = (9/2)*A000129(2*n-2). - G. C. Greubel, Sep 15 2021
Showing 1-4 of 4 results.