A249599 Analog of A097717 in base 5.
1, 16, 3348, 411184, 5, 1262796336, 31415153952, 128, 639, 46402790906782052954848931760, 9548, 37884308119951668432, 507, 483747841655344, 2949712546290578068913640, 368402917173844349535205696, 3162, 1149642179207353109724066230688
Offset: 1
Examples
a(2)=16, because in base 5, 16 is written 31 and 16/2 is 8 and written 13.
Links
- Lars Blomberg, Table of n, a(n) for n = 1..369
Programs
-
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
Extensions
a(6)-a(18) from Lars Blomberg, Feb 05 2015