OFFSET
1,2
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 1..13
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
Vincenzo Librandi, Nov 29 2009
STATUS
approved