|
| |
|
|
A144779
|
|
Variant of Sylvester's sequence: a(n+1) = a(n)^2 - a(n) + 1, with a(1) = 5
|
|
17
| |
|
|
5, 21, 421, 176821, 31265489221, 977530816197201697621, 955566496615167328821993756200407115362021, 913107329453384594090655605142589591944556891901674138343716072975722193082773842421
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
FORMULA
| a(n) =2.12799590746410705457735194814049878380944092755462023387761440825397916796276349223231^(2^n) a(n+1) = a(n)^2 - a(n) + 1, with a(1) = 5
|
|
|
MATHEMATICA
| a = {}; k = 5; Do[AppendTo[a, k]; k = k^2 - k + 1, {n, 1, 10}]; a or Table[Round[2.12799590746410705457735194814049878380944092755462023387761440825397916796276349223231^(2^n)], {n, 1, 8}] (*Artur Jasinski*)
NestList[#^2-#+1&, 5, 8] (* From Harvey P. Dale, Jan 17 2012 *)
|
|
|
CROSSREFS
| A000058, A082732, A144779, A144781, A144781, A144782, A144783, A144784, A144785, A144786, A144787, A144788
Sequence in context: A009732 A009758 A143503 * A193324 A156860 A063619
Adjacent sequences: A144776 A144777 A144778 * A144780 A144781 A144782
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Artur Jasinski (grafix(AT)csl.pl), Sep 21 2008
|
| |
|
|
