A105768 Prime Lucas 7-step numbers, A104621.

3, 7, 31, 127, 983, 122401, 15231991, 30341581, 60439343, 239818559, 235883775871, 935968272887, 462162688688737, 3592979567873032703, 439785318101603999198591, 432569613524779275706080077

Offset: 1

Author

T. D. Noe, Apr 22 2005

Keywords

• nonn

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
• Eric Weisstein's World of Mathematics, Lucas n-Step Number

Crossrefs

Cf. A104622 (indices of prime Lucas 7-step numbers).

Programs

Mathematica

a={-1, -1, -1, -1, -1, -1, 7}; lst={}; Do[s=Plus@@a; a=RotateLeft[a]; a[[ -1]]=s; If[PrimeQ[s], AppendTo[lst, s]], {n, 1000}]; lst