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-2 of 2 results.

A041403 Denominators of continued fraction convergents to sqrt(216).

Original entry on oeis.org

1, 1, 3, 10, 23, 33, 947, 980, 2907, 9701, 22309, 32010, 918589, 950599, 2819787, 9409960, 21639707, 31049667, 891030383, 922080050, 2735190483, 9127651499, 20990493481, 30118144980, 864298552921, 894416697901, 2653131948723, 8853812544070, 20360757036863
Offset: 0

Views

Author

Keywords

Crossrefs

Programs

  • Magma
    I:=[1,1,3,10,23,33,947,980,2907,9701,22309, 32010]; [n le 12 select I[n] else 970*Self(n-6)-Self(n-12): n in [1..40]]; // Vincenzo Librandi, Dec 17 2013
  • Mathematica
    Denominator[Convergents[Sqrt[216], 30]] (* Vincenzo Librandi, Dec 17 2013 *)

Formula

G.f.: -(x^10 -x^9 +3*x^8 -10*x^7 +23*x^6 -33*x^5 -23*x^4 -10*x^3 -3*x^2 -x -1) / ((x^4 -10*x^2 +1)*(x^8 +10*x^6 +99*x^4 +10*x^2 +1)). - Colin Barker, Nov 17 2013
a(n) = 970*a(n-6) - a(n-12) for n>11. - Vincenzo Librandi, Dec 17 2013

Extensions

More terms from Colin Barker, Nov 17 2013

A190567 Continued fraction expansion of 46*sqrt(46).

Original entry on oeis.org

311, 1, 76, 1, 622, 1, 76, 1, 622, 1, 76, 1, 622, 1, 76, 1, 622, 1, 76, 1, 622, 1, 76, 1, 622, 1, 76, 1, 622, 1, 76, 1, 622, 1, 76, 1, 622, 1, 76, 1, 622, 1, 76, 1, 622, 1, 76, 1, 622, 1, 76, 1, 622, 1, 76, 1, 622, 1, 76, 1, 622, 1, 76, 1, 622, 1, 76, 1, 622, 1, 76, 1, 622
Offset: 0

Views

Author

Bruno Berselli, May 13 2011

Keywords

Crossrefs

Programs

  • Magma
    [311] cat &cat[ [1,76,1,622]: n in [1..18] ];
    
  • Magma
    I:=[311,1,76,1,622]; [n le 5 select I[n] else Self(n-4): n in [1..80]]; // Vincenzo Librandi, Jun 14 2013
  • Mathematica
    ContinuedFraction[46 Sqrt[46], 80] (* or *) PadRight[{311}, 80, {622, 1, 76, 1}]
    CoefficientList[Series[(311 + x + 76 x^2 + x^3 + 311 x^4) / (1 - x^4), {x, 0, 100}], x] (* Vincenzo Librandi, Jun 14 2013 *)
  • PARI
    a(n)=if(n,[622,1,76,1][n%4+1],311) \\ Charles R Greathouse IV, May 13 2011
    

Formula

G.f.: (311+x+76*x^2+x^3+311*x^4)/(1-x^4).
a(n) = 1+3*(1+(-1)^n)*(116+91*i^n)/2 with n>0, i=sqrt(-1) and a(0)=311.
a(n) = (-1513*(n mod 4)+575*((n+1) mod 4)+125*((n+2) mod 4)+2213*((n+3) mod 4))/12 for n>0.
a(n) = a(n-4), n>=5. - Vincenzo Librandi, Jun 14 2013
Showing 1-2 of 2 results.