A104577 Indices of prime generalized tetranacci numbers, A073817.
2, 3, 8, 9, 16, 19, 24, 27, 46, 68, 71, 78, 107, 198, 309, 377, 477, 1057, 1631, 2419, 3974, 4293, 8247, 10513, 10709, 12011, 15042, 30543, 31607, 39664, 47552, 145858
Offset: 1
Keywords
Links
- Tony D. Noe and Jonathan Vos Post, Primes in Fibonacci n-step and Lucas n-step Sequences, J. of Integer Sequences, Vol. 8 (2005), Article 05.4.4
Crossrefs
Cf. A104576 (indices of prime generalized tribonacci numbers).
Programs
-
Mathematica
a={-1, -1, -1, 4}; Do[s=Plus@@a; a=RotateLeft[a]; a[[4]]=s; If[PrimeQ[s], Print[n]], {n, 30000}]
Comments