OFFSET
1,2
LINKS
Lars Blomberg, Table of n, a(n) for n = 1..369
EXAMPLE
a(2)=16, because in base 5, 16 is written 31 and 16/2 is 8 and written 13.
MAPLE
A249599 := proc(n)
local m, b, mbas, msf ;
b := 5;
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, A249599(n)) ;
end do: # R. J. Mathar, Nov 11 2014
CROSSREFS
KEYWORD
nonn,base
AUTHOR
R. J. Mathar, Mar 30 2009
EXTENSIONS
a(6)-a(18) from Lars Blomberg, Feb 05 2015
STATUS
approved