A066091 a(n+2) = a(n+1)*a(n)*(a(n+1)+a(n)).

1, 2, 6, 96, 58752, 331914018816, 6472527787868799987640958976, 13905078437588927055776809046479521344793888146925785597768443625472

Offset: 0

Author

Benoit Cloitre, Dec 30 2001

Keywords

• nonn

Comments

The next term has 163 digits. - Harvey P. Dale, Dec 09 2017

Links

• Harry J. Smith, Table of n, a(n) for n = 0..10

Programs

Mathematica

nxt[{a_,b_}]:={b,a*b*(a+b)}; NestList[nxt,{1,2},10][[All,1]] (* Harvey P. Dale, Dec 09 2017 *)

PARI

{ for (n=0, 10, if (n>1, a=a1*a2*(a1+a2); a2=a1; a1=a, if (n, a=a1=2, a=a2=1)); write("b066091.txt", n, " ", a) ) } \\ Harry J. Smith, Nov 12 2009