login
A204321
Start with 4. Square the previous term and subtract it.
3
4, 12, 132, 17292, 298995972, 89398590973228812, 7992108067998667938125889533702532, 63873791370569400659097694858350356285036046451665934814399129508492
OFFSET
1,1
LINKS
J. A. Haddley, Doubling Hypercuboids, Preprint 2015.
FORMULA
a(n) = a(n-1)*(a(n-1)-1).
a(n) ~ c^(2^n), where c = 1.8401979467004699327247921093647566233474761412868967823409865843403604499... . - Vaclav Kotesovec, Dec 18 2014
MAPLE
A204321 := proc(n)
if n = 1 then
4;
else
procname(n-1)*(procname(n-1)-1) ;
end if;
end proc:
seq(A204321(n), n=1..10) ; # R. J. Mathar, Jan 19 2012
MATHEMATICA
Join[{a = 4}, Table[a = a^2 - a, {n, 9}]] (* Vladimir Joseph Stephan Orlovsky, Feb 24 2012 *)
RecurrenceTable[{a[1]==4, a[n] == a[n-1]*(a[n-1]-1)}, a, {n, 1, 10}] (* Vaclav Kotesovec, Dec 18 2014 *)
NestList[#^2-#&, 4, 10] (* Harvey P. Dale, Jun 20 2023 *)
CROSSREFS
Sequence in context: A009663 A197899 A002029 * A152121 A077611 A052598
KEYWORD
nonn
AUTHOR
Daniel Chiverton, Jan 14 2012
STATUS
approved