A078919 Partial products of A079069.

1, 1, 1, 1, 2, 4, 12, 72, 576, 12096, 653184, 114960384, 132779243520, 1269104009564160, 258206825369885736960, 2850769895485902112338739200, 5543726888202115028458043149398835200, 12452794281642743516125592836044191777302983475200

Offset

1,5

Links

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

Formula

a(n)=(a(n-2)+a(n-3))*a(n-1)/a(n-4), n>4. a(1)=a(2)=a(3)=a(4)=1.

Mathematica

RecurrenceTable[{a[1]==a[2]==a[3]==a[4]==1, a[n]==(a[n-2]+a[n-3]) a[n-1]/a[n-4]}, a, {n, 20}] (* Harvey P. Dale, Mar 12 2015 *)

Crossrefs

Cf. A078918.

a(n+1)/a(n)=A079069(n).

Sequence in context: A266463 A013207 A172165 * A085864 A060935 A141522

Adjacent sequences: A078916 A078917 A078918 * A078920 A078921 A078922

Keyword

nonn

Author

Benoit Cloitre, Dec 13 2002

Extensions

One more term (a(18)) from Harvey P. Dale, Mar 12 2015

Status

approved