This site is supported by donations to The OEIS Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A253333 Primes in the 7th-order Fibonacci numbers A060455. 2
 7, 13, 97, 193, 769, 1531, 3049, 6073, 12097, 24097, 95617, 379399, 2998753, 187339729, 373174033, 2949551617, 184265983633, 731152932481, 88025699967469825543, 175344042716296888429, 4979552865927484193343796114081304399449 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,1 COMMENTS a(22) is too large to display here. It has 53 digits and is the 180th term in A060455. LINKS Robert G. Wilson v, Table of n, a(n) for n = 1..34 MATHEMATICA a={1, 1, 1, 1, 1, 1, 1}; step=7; lst={}; For[n=step, n<=1000, n++, sum=Plus@@a; If[PrimeQ[sum], AppendTo[lst, sum]]; a=RotateLeft[a]; a[[7]]=sum]; lst With[{c=PadRight[{}, 7, 1]}, Select[LinearRecurrence[c, c, 150], PrimeQ]] (* Harvey P. Dale, May 08 2015 *) PROG (PARI) lista(nn) = {gf = ( -1+x^2+2*x^3+3*x^4+4*x^5+5*x^6 ) / ( -1+x+x^2+x^3+x^4+x^5+x^6+x^7 ); for (n=0, nn, if (isprime(p=polcoeff(gf+O(x^(n+1)), n)), print1(p, ", ")); ); } \\ Michel Marcus, Jan 11 2015 CROSSREFS Cf. A001590, A001631, A100683, A231574, A231575, A232543, A214899, A020992, A233554, A214727, A234696, A141523, A235862, A214825, A235873, A001630, A241660, A247027, A000288, A247561, A000322, A248920, A000383, A247192, A060455, A253318. Sequence in context: A320461 A132373 A110293 * A039687 A001544 A202152 Adjacent sequences:  A253330 A253331 A253332 * A253334 A253335 A253336 KEYWORD nonn AUTHOR Robert Price, Dec 30 2014 STATUS approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified August 25 03:10 EDT 2019. Contains 326318 sequences. (Running on oeis4.)