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

1, 3, 2, 3, 4, 9, 32, 279, 8896, 2481705, 22077238784, 54789193873965015, 1209594115938395614939902976, 66272686526956073137307690185435702644419625

Offset

1,2

Links

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

Mathematica

a=1; b=3; lst={a, b}; Do[c=a*b-a; AppendTo[lst, c]; a=b; b=c, {n, 14}]; lst
RecurrenceTable[{a[1]==1, a[2]==3, a[n]==a[n-2]a[n-1]-a[n-2]}, a, {n, 20}] (* Harvey P. Dale, Feb 09 2014 *)

Crossrefs

Sequence in context: A003559 A200599 A239947 * A236361 A227634 A064885

Adjacent sequences: A173090 A173091 A173092 * A173094 A173095 A173096

Keyword

nonn

Author

Vladimir Joseph Stephan Orlovsky, Feb 09 2010

Status

approved