login
This site is supported by donations to The OEIS Foundation.

 

Logo


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.

License Agreements, Terms of Use, Privacy Policy. .

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