A072042 a(n+2) = a(n+1)*a(n)*(1+1/n), a(1)=a(2)=1.

1, 1, 2, 3, 8, 30, 288, 10080, 3317760, 37623398400, 138694895861760000, 5739990655358858585702400000, 868480806755424464755519466250436608000000000

Offset

1,3

Links

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

Steven R. Finch, Substitution dynamics, January 23, 2014. [Cached copy, with permission of the author]

C. Godrèche and J. M. Luck, Quasiperiodicity and randomness in tilings of the plane, J. Statist. Phys. 55 (1989) 1-28.

J. Nilsson, On the entropy of random Fibonacci words, arXiv:1001.3513 [math.CO], 2010.

Mathematica

a[1] = a[2] = 1; a[n_] := a[n - 1]*a[n - 2]*(1 + 1/(n - 2)); Table[ a[n], {n, 1, 13}]
RecurrenceTable[{a[1]==a[2]==1, a[n+2]==a[n+1]*a[n]*(1+1/n)}, a, {n, 13}] (* Harvey P. Dale, Sep 18 2018 *)

Crossrefs

Cf. A235857, A235858.

Sequence in context: A301737 A001048 A141520 * A372711 A160586 A340935

Adjacent sequences: A072039 A072040 A072041 * A072043 A072044 A072045

Keyword

easy,nonn

Author

Benoit Cloitre, Jul 29 2002

Extensions

Edited by Robert G. Wilson v, Jul 31 2002

Status

approved