|
|
A105850
|
|
a(n+1) = a(n)^2 - 2^(2^n+1) with a(1) = 8.
|
|
0
|
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
Lehmer used this sequence in his proof of the Lucas-Lehmer test.
|
|
LINKS
|
|
|
FORMULA
|
|
|
MATHEMATICA
|
nxt[{n_, a_}]:={n+1, a^2-2^(2^n+1)}; Transpose[NestList[nxt, {1, 8}, 7]][[2]] (* Harvey P. Dale, Jul 24 2013 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Douglas Stones (dssto1(AT)student.monash.edu.au), Apr 22 2005
|
|
STATUS
|
approved
|
|
|
|