login
Indices of primes in the hexanacci numbers sequence A000383.
5

%I #42 Dec 05 2014 18:07:23

%S 7,9,30,31,33,46,52,54,82,102,109,124,210,301,351,365,369,1045,2044,

%T 2125,2143,2815,4377,4754,4893,7310,11558,17602,17929,28389,32100,

%U 44298,106725,151678,197953

%N Indices of primes in the hexanacci numbers sequence A000383.

%C a(36) > 2*10^5.

%H Tony D. Noe and Jonathan Vos Post, <a href="http://www.cs.uwaterloo.ca/journals/JIS/VOL8/Noe/noe5.html">Primes in Fibonacci n-step and Lucas n-step Sequences</a>, J. of Integer Sequences, Vol. 8 (2005), Article 05.4.4

%t a={1,1,1,1,1}; For[n=5, n<=1000, n++, sum=Plus@@a; If[PrimeQ[sum], Print[n]]; a=RotateLeft[a]; a[[5]]=sum]

%Y Cf. A001590, A001631, A100683, A231574, A231575, A232542, A214899, A230607, A020992, A232498, A214727, A081172, A214752, A141523, A214825, A235862, A000288, A000322, A000383, A249413.

%K nonn,more

%O 1,1

%A _Robert Price_, Dec 03 2014