|
|
A168558
|
|
a(n) = n + a(n-1)^2 for n>1, a(1)=0.
|
|
1
|
|
|
|
OFFSET
|
1,2
|
|
LINKS
|
|
|
MATHEMATICA
|
RecurrenceTable[{a[1] == 0, a[n] == a[n-1]^2 + n}, a, {n, 20}] (* Vincenzo Librandi, Sep 24 2014 *)
|
|
PROG
|
(Magma) [n le 1 select (n-1) else Self(n-1)^2+n: n in [1..10] ]; // Vincenzo Librandi, Sep 24 2014
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|