A175489 a(n) = Sum_{k=1..n} b(k,n), where b(k,n) is the largest positive integer that, when written in binary, occurs as a substring in both binary k and binary n.

1, 3, 5, 8, 11, 16, 17, 21, 26, 28, 39, 46, 55, 58, 51, 54, 63, 65, 85, 87, 82, 104, 118, 128, 144, 147, 163, 176, 193, 181, 141, 137, 154, 156, 192, 162, 212, 231, 252, 247, 275, 202, 267, 307, 306, 333, 336, 345, 373, 381, 410, 412, 419, 423, 475, 497, 532, 539

Offset

1,2

Comments

Row sums of A175488. - R. J. Mathar, Sep 28 2010

Links

Rémy Sigrist, Table of n, a(n) for n = 1..8192

Rémy Sigrist, PARI program for A175489

Maple

A175488 := proc(n, m) for a from m to 1 by -1 do abin := convert(a, base, 2) ; nbin := convert(n, base, 2) ; mbin := convert(m, base, 2) ; if verify(abin, nbin, 'sublist') and verify(abin, mbin, 'sublist') then return a; end if; end do: end proc:
A175489 := proc(n) add(A175488(n, m), m=1..n) ; end proc:
seq(A175489(n), n=1..50) ;
# R. J. Mathar, Sep 28 2010

Prog

(PARI) See Links section.

Crossrefs

Cf. A175488, A175490.

Sequence in context: A049706 A080415 A340318 * A289244 A248879 A014688

Adjacent sequences: A175486 A175487 A175488 * A175490 A175491 A175492

Keyword

base,nonn,look

Author

Leroy Quet, May 28 2010

Extensions

More terms from R. J. Mathar, Sep 28 2010

Status

approved