A090002 Length of longest contiguous block of 1's in binary expansion of n-th triangular number.

0, 1, 2, 2, 1, 4, 1, 3, 1, 2, 3, 1, 3, 2, 2, 4, 1, 2, 2, 5, 2, 3, 6, 1, 2, 1, 5, 4, 2, 2, 3, 5, 1, 2, 2, 3, 2, 6, 3, 2, 2, 3, 3, 3, 4, 2, 3, 2, 2, 2, 5, 3, 2, 3, 3, 2, 4, 3, 4, 3, 3, 3, 4, 6, 1, 2, 2, 3, 1, 4, 2, 7, 1, 2, 3, 2, 3, 3, 2, 2, 2, 5, 2, 4, 5, 3, 3, 4, 4, 5, 12, 2, 2, 2, 3, 3, 2, 1, 4, 2, 3, 5

Offset

0,3

Comments

a(n) = A038374(A000217(n)).

Links

Antti Karttunen, Table of n, a(n) for n = 0..16384

Index entries for sequences related to binary expansion of n

Mathematica

Join[{0}, Max[Length/@Select[Split[IntegerDigits[#, 2]], #[[1]]==1&]]&/@ Accumulate[ Range[110]]] (* Harvey P. Dale, Jul 28 2022 *)

Crossrefs

Cf. A000120, A090001, A090003, A089999, A090048.

Sequence in context: A275578 A112085 A353843 * A061298 A276468 A002126

Adjacent sequences: A089999 A090000 A090001 * A090003 A090004 A090005

Keyword

nonn,base

Author

Reinhard Zumkeller, Nov 20 2003

Status

approved