A144788 a(n+1) = a(n)^3 - a(n) + 1 with a(1) = 3.

3, 25, 15601, 3797146111201, 54748462363349863789331489199516542401, 164102719777453765093060237305105241279744702931788833463132240094953276902575203916973404664183940277497050364801

Offset

1,1

Links

Table of n, a(n) for n=1..6.

Formula

a(n) = round(c^(3^n)), where c = 1.4298877386... is given in A144811.

Mathematica

a = {}; k = 3; Do[AppendTo[a, k]; k = k^3 - k + 1, {n, 1, 8}]; a (* Artur Jasinski *)
NestList[#^3-#+1&, 3, 5] (* Harvey P. Dale, Jan 09 2014 *)

Crossrefs

Cf. A000058, A082732, A144779-A144788.

Sequence in context: A094815 A246536 A183248 * A182135 A307654 A307653

Adjacent sequences: A144785 A144786 A144787 * A144789 A144790 A144791

Keyword

easy,nonn

Author

Artur Jasinski, Sep 22 2008

Status

approved