OFFSET
1,3
EXAMPLE
33 in base 4 is 201, which interpreted in base 7 is 99 = 3*33.
MATHEMATICA
Select[Range[0, 20*10^6], Divisible[FromDigits[IntegerDigits[#, 4], 7], #]&] (* Harvey P. Dale, Nov 22 2015 *)
CROSSREFS
KEYWORD
base,nonn
AUTHOR
Erich Friedman, Jul 21 2001
EXTENSIONS
More terms from Naohiro Nomoto, Aug 06 2001
Offset changed to 1 and a(22)-a(30) from Georg Fischer, Mar 13 2023
STATUS
approved