login
A127194
A 10th-order Fibonacci sequence.
9
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 10, 19, 37, 73, 145, 289, 577, 1153, 2305, 4609, 9217, 18424, 36829, 73621, 147169, 294193, 588097, 1175617, 2350081, 4697857, 9391105, 18772993, 37527562, 75018295, 149962969, 299778769, 599263345, 1197938593
OFFSET
1,11
COMMENTS
10th-order Fibonacci constant = 1.999018633...
FORMULA
O.g.f.: x*(-1+x^2+2*x^3+3*x^4+4*x^5+5*x^6+6*x^7+7*x^8+8*x^9) / (-1+x+x^2+x^3+x^4+x^5+x^6+x^7+x^8+x^9+x^10). - R. J. Mathar, Nov 23 2007
MATHEMATICA
With[{t=Table[1, {10}]}, LinearRecurrence[t, t, 40]] (* Harvey P. Dale, Nov 12 2013 *)
PROG
(PARI) a(n)=([0, 1, 0, 0, 0, 0, 0, 0, 0, 0; 0, 0, 1, 0, 0, 0, 0, 0, 0, 0; 0, 0, 0, 1, 0, 0, 0, 0, 0, 0; 0, 0, 0, 0, 1, 0, 0, 0, 0, 0; 0, 0, 0, 0, 0, 1, 0, 0, 0, 0; 0, 0, 0, 0, 0, 0, 1, 0, 0, 0; 0, 0, 0, 0, 0, 0, 0, 1, 0, 0; 0, 0, 0, 0, 0, 0, 0, 0, 1, 0; 0, 0, 0, 0, 0, 0, 0, 0, 0, 1; 1, 1, 1, 1, 1, 1, 1, 1, 1, 1]^(n-1)*[1; 1; 1; 1; 1; 1; 1; 1; 1; 1])[1, 1] \\ Charles R Greathouse IV, Jun 15 2015
CROSSREFS
Cf. Fibonacci numbers A000045, tribonacci numbers A000213, tetranacci numbers A000288, pentanacci numbers A000322, hexanacci numbers A000383, heptanacci numbers A060455, octanacci numbers A123526, 9th-order Fibonacci sequence A127193.
Sequence in context: A085728 A195955 A374806 * A083705 A245003 A372096
KEYWORD
nice,nonn,easy
AUTHOR
Luis A Restrepo (luisiii(AT)hotmail.com), Jan 11 2007
STATUS
approved