A367430 a(1)=a(2)=a(3)=1; for n > 3, a(n) = a(n-1)*a(n-2)*a(n-3) + a(n-1) + a(n-2) + a(n-3).

1, 1, 1, 4, 10, 55, 2269, 1250284, 156030444388, 442641893445738546589, 86351628807475712878787449679327520349, 5963928033713995675288097975918984841058670353057557384156171322944994

Offset: 1

Author

José María Grau Ribas, Nov 18 2023

Keywords

• nonn

Crossrefs

Cf. A063896 (a(n) = a(n-1)*a(n-2) + a(n-1) + a(n-2)), A000073.

Programs

Mathematica

a[1] = 1; a[2] = 1; a[3] = 1;
a[n_] := a[n] = a[n - 1]*a[n - 2]*a[n - 3] + a[n - 1] + a[n - 2] + a[n - 3];
Table[a[n], {n, 1, 12}]