

A241660


Indices of primes in A001630.


8



3, 4, 7, 19, 62, 94, 722, 5197, 5262, 6182, 14007, 21579, 35354, 75592
(list;
graph;
refs;
listen;
history;
text;
internal format)



OFFSET

1,1


COMMENTS

a(15) > 2*10^5.


LINKS

Table of n, a(n) for n=1..14.
Tony D. Noe and Jonathan Vos Post, Primes in Fibonacci nstep and Lucas nstep Sequences, J. of Integer Sequences, Vol. 8 (2005), Article 05.4.4


MATHEMATICA

a={0, 0, 1, 2}; Print[3]; For[n=4, n<=1000, n++, sum=Plus@@a; If[PrimeQ[sum], Print[n]]; a=RotateLeft[a]; a[[4]]=sum]


CROSSREFS

Cf. A001590, A100683, A231574, A231575, A232542, A214899, A230607, A020992, A232498, A214727, A081172, A214752, A141523,A214825, A235862.
Sequence in context: A117789 A169892 A246805 * A030724 A124082 A056655
Adjacent sequences: A241657 A241658 A241659 * A241661 A241662 A241663


KEYWORD

nonn


AUTHOR

Robert Price, Apr 26 2014


EXTENSIONS

Prepended a(1)=3 and Mathematica program corrected by Robert Price, Sep 09 2014


STATUS

approved



