|
|
A014913
|
|
a(1)=1, a(n) = 24*a(n-1) + n.
|
|
2
|
|
|
1, 26, 627, 15052, 361253, 8670078, 208081879, 4993965104, 119855162505, 2876523900130, 69036573603131, 1656877766475156, 39765066395403757, 954361593489690182, 22904678243752564383, 549712277850061545208
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
LINKS
|
|
|
FORMULA
|
a(1)=1, a(2)=26, a(3)=627, a(n) = 26*a(n-1) - 49*a(n-2) + 24*a(n-3). - Vincenzo Librandi, Oct 19 2012
|
|
MATHEMATICA
|
LinearRecurrence[{26, -49, 24}, {1, 26, 627}, 20] (* Vincenzo Librandi, Oct 19 2012 *)
|
|
PROG
|
(Magma) I:=[1, 26, 627]; [n le 3 select I[n] else 26*Self(n-1) - 49*Self(n-2) + 24*Self(n-3): n in [1..20]]; // Vincenzo Librandi, Oct 19 2012
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|