1,4

a(2^m) = 2^m -1.

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

f[l_]:=Join[l, l+Range[Length[l]]]; Nest[f, {0}, 7] (* Ray Chandler, Mar 04 2010 *)

Cf. A083741, A175187.

Sequence in context: A162932 A216036 A008924 * A021323 A284619 A147549

Adjacent sequences: A175183 A175184 A175185 * A175187 A175188 A175189

easy,nonn

Leroy Quet, Mar 01 2010

Extended by Ray Chandler, Mar 04 2010

approved