1,2

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

a(n) = A061313(n) + 1. - Philippe Deléham, Nov 03 2008

a[1]=1; a[n_]:=a[n]=If[OddQ[n], a[(n+1)/2]+2, a[n/2]+1]; Table[a[n], {n, 300}]

Cf. A119476.

Sequence in context: A308982 A182298 A182732 * A161920 A278512 A278511

Adjacent sequences: A119474 A119475 A119476 * A119478 A119479 A119480

nonn

Zak Seidov, May 22 2006

approved