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

Author

Leroy Quet, May 28 2010

Keywords

• base
• nonn
• look

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

Crossrefs

Cf. A175488, A175490.

Programs

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

PARI

See Links section.

Extensions

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