|
|
A042056
|
|
Numerators of continued fraction convergents to sqrt(552).
|
|
2
|
|
|
23, 47, 2185, 4417, 205367, 415151, 19302313, 39019777, 1814212055, 3667443887, 170516630857, 344700705601, 16026749088503, 32398198882607, 1506343897688425, 3045085994259457, 141580299633623447, 286205685261506351
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,1
|
|
LINKS
|
|
|
FORMULA
|
|
|
MATHEMATICA
|
Numerator[Convergents[Sqrt[552], 30]] (* or *) CoefficientList[Series[(1 + x) (23 + 24 x - x^2)/(1 - 94 x^2 + x^4), {x, 0, 30}], x] (* Vincenzo Librandi, Nov 14 2013 *)
LinearRecurrence[{0, 94, 0, -1}, {23, 47, 2185, 4417}, 20] (* Harvey P. Dale, Mar 13 2017 *)
|
|
PROG
|
(Magma) I:=[23, 47, 2185, 4417]; [n le 4 select I[n] else 94*Self(n-2)-Self(n-4): n in [1..25]]; // Vincenzo Librandi, Nov 14 2013
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,cofr,frac,easy,less
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|