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.

A127624 An 11th-order Fibonacci sequence: a(n) = a(n-1) + ... + a(n-11).

Original entry on oeis.org

1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 11, 21, 41, 81, 161, 321, 641, 1281, 2561, 5121, 10241, 20481, 40951, 81881, 163721, 327361, 654561, 1308801, 2616961, 5232641, 10462721, 20920321, 41830401, 83640321, 167239691, 334397501, 668631281
Offset: 1

Views

Author

Luis A Restrepo (Luisiii(AT)mac.com), Jan 19 2007

Keywords

Comments

The ratio a(n+1)/a(n) approaches the unique real root of r^11 = r^10 + ... + r + 1; r is about 1.99951040197828549144.
All terms have last digit 1.

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, 10th-order Fibonacci sequence A127194.
Cf. A257966 (indices of primes in a), A257967 (primes in a).

Programs

  • Mathematica
    Module[{nn=11,lr},lr=PadRight[{},nn,1];LinearRecurrence[lr,lr,20]] (* Harvey P. Dale, Feb 04 2015 *)
  • PARI
    x='x+O('x^50); Vec(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+9*x^10)/(-1+x+x^2+x^3+x^4+x^5+x^6+x^7+x^8+x^9+x^10+x^11)) \\ G. C. Greubel, Jul 28 2017

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+9*x^10) / (-1+x+x^2+x^3+x^4+x^5+x^6+x^7+x^8+x^9+x^10+x^11). - R. J. Mathar, Dec 02 2007

Extensions

Edited by Dean Hickerson, Mar 09 2007

A257967 Primes in the 11th-order Fibonacci numbers A127624.

Original entry on oeis.org

11, 41, 641, 10462721, 20920321, 10917370260001, 364090824435675874561, 3037065045777476472194281921, 97067184407836614348142428161, 3237159714751144204638073829896089601, 26434543100644872259207947255028288307201, 3600373169282616313621210190325730096037120382894091
Offset: 1

Views

Author

Robert Price, May 14 2015

Keywords

Comments

a(13) is too large to display here. It has 61 digits and is the 210th term in A127624.

Crossrefs

Programs

  • Mathematica
    a={1,1,1,1,1,1,1,1,1,1,1}; step=11; offset=1; lst={}; For[n=step+offset,n<=1000,n++, sum=Plus@@a; If[PrimeQ[sum], AppendTo[lst,sum]]; a=RotateLeft[a]; a[[step]]=sum]; lst
Showing 1-2 of 2 results.