|
| |
|
|
A066091
|
|
a(n+2) = a(n+1)*a(n)*(a(n+1)+a(n)).
|
|
2
|
| |
|
|
|
OFFSET
|
0,2
|
|
|
COMMENTS
|
|
|
|
LINKS
|
|
|
|
MATHEMATICA
|
nxt[{a_, b_}]:={b, a*b*(a+b)}; NestList[nxt, {1, 2}, 10][[All, 1]] (* Harvey P. Dale, Dec 09 2017 *)
|
|
|
PROG
|
(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
|
|
|
CROSSREFS
|
|
|
|
KEYWORD
|
nonn
|
|
|
AUTHOR
|
|
|
|
STATUS
|
approved
|
| |
|
|
