login

Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.

a(n) = (product of previous terms) * (sum of previous terms), with a(1) = 2, a(2) = 3.
0

%I #19 Sep 09 2018 02:24:01

%S 2,3,30,6300,7183890000,58523836061676932100000000,

%T 27902190435973847782838929289594860174185569868010410000000000000000

%N a(n) = (product of previous terms) * (sum of previous terms), with a(1) = 2, a(2) = 3.

%e a(3) = (2+3) * (2*3) = 5*6 = 30.

%t t = {2, 3}; Do[AppendTo[t, (Times @@ t) Total[t]], {5}]; t (* _T. D. Noe_, Oct 08 2012 *)

%o (Maxima)

%o a[0]:2$ a[1]:3$ a[n]:=sum(a[i], i, 0, n-1)*(prod(a[i], i, 0, n-1));

%o makelist(a[n], n, 0, 5); /* _Martin Ettl_, Oct 04 2012 */

%K nonn

%O 1,1

%A _Jon Perry_, Oct 01 2012