A249596 Analog of A097717 in base 2.

1, 2, 9, 4, 35, 558, 2205, 8, 135, 137970, 33, 1068, 545259, 135926, 138845925, 16, 527, 2106, 35288379945, 2100, 537075, 8382, 2093, 4283544, 1069975, 130, 2294286602622705, 533820, 133371, 146557818382226310, 585910928570692725, 32, 2079

Offset

1,2

Comments

Conjecture: a(n) = n*A165781(n). - R. J. Mathar, Nov 11 2014

Links

Lars Blomberg, Table of n, a(n) for n = 1..1661

Maple

A249596 := proc(n)
    local m, b, mbas, msf ;
    b := 2;
    for m from 1 to 1999999 do
        mbas := convert(m, base, b) ;
        msf := [op(-1, mbas), op(1..nops(mbas)-1, mbas)] ;
        msf := add(op(i, msf)*b^(i-1), i=1..nops(msf)) ;
        if m/n = msf then
            return m;
        end if;
    end do:
    -1 ;
end proc:
for n from 1 do
    print(n, A249596(n)) ;
end do: # R. J. Mathar, Nov 11 2014

Crossrefs

Cf. A094676, A249597, A249598, A249599.

Sequence in context: A054789 A002508 A353242 * A038215 A264110 A119019

Adjacent sequences: A249593 A249594 A249595 * A249597 A249598 A249599

Keyword

nonn,base

Author

R. J. Mathar, Mar 30 2009

Extensions

a(15)-a(33) from Lars Blomberg, Feb 05 2015

Status

approved