A173094 a(1)=2, a(2)=3, a(n)=a(n-2)*a(n-1)-a(n-1).

2, 3, 3, 6, 12, 60, 660, 38940, 25661460, 999231590940, 25641740502411581460, 25622037156669717708454796390940, 656993627914472375437286314449293585586011019581460

Offset

1,1

Links

Table of n, a(n) for n=1..13.

Mathematica

a=2; b=3; lst={a, b}; Do[c=a*b-b; AppendTo[lst, c]; a=b; b=c, {n, 13}]; lst
RecurrenceTable[{a[1]==2, a[2]==3, a[n]==a[n-2]a[n-1]-a[n-1]}, a, {n, 20}] (* Harvey P. Dale, Oct 10 2015 *)

Crossrefs

Cf. A173093.

Sequence in context: A049875 A180887 A329748 * A087989 A028257 A100228

Adjacent sequences: A173091 A173092 A173093 * A173095 A173096 A173097

Keyword

nonn

Author

Vladimir Joseph Stephan Orlovsky, Feb 09 2010

Extensions

Definition corrected by Harvey P. Dale, Oct 10 2015

Status

approved