1,3

Triple recursion version of A055748.

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

hg[n_Integer?Positive] := hg[n] =hg[hg[hg[n-1]]] + hg[n -1- hg[n-2]] hg[1] = hg[2] = 1 digits=200 a=Table[hg[n], {n, 1, digits}]

Cf. A055748.

Sequence in context: A003056 A117707 A163352 * A172263 A140437 A226763

Adjacent sequences: A087831 A087832 A087833 * A087835 A087836 A087837

nonn

Roger L. Bagula, Oct 07 2003

approved