|
|
|
|
0, 5, 125, 3120, 77875, 1943755, 48516000, 1210956245, 30225390125, 754423796880, 18830369531875, 470004814499995, 11731289992968000, 292812245009700005, 7308574835249532125, 182421558636228603120
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
COMMENTS
|
If a(n)=x and a(n+1)=y, then (x^2+y^2)/(xy+1)=25.
|
|
LINKS
|
|
|
FORMULA
|
a(n) = +25*a(n-1) -a(n-2).
|
|
MATHEMATICA
|
CoefficientList[Series[(5*z)/(z^2-25*z+1), {z, 0, 25}], z] (* Vincenzo Librandi, Jan 29 2012 *)
LinearRecurrence[{25, -1}, {0, 5}, 20] (* Harvey P. Dale, Mar 06 2018 *)
|
|
PROG
|
(Magma) I:=[0, 5]; [n le 2 select I[n] else 25*Self(n-1)-Self(n-2): n in [1..20]]; // Vincenzo Librandi, Jan 29 2012
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|