|
%I #22 Oct 25 2019 09:43:52
%S 1,2,3,4,5,6,51,102,105,153,156,207,210,258,261,312,315,2589,2590,
%T 2601,2753,5354,5355,5506,8108,8259,8260,10861,11013,11025,13614,
%U 13615,13626,13766,13778,16379,16380,16531,33045,140403,289065,1123224
%N Numbers that, when expressed in base 7 and then interpreted in base 10, yield a multiple of the original number.
%C Decimal 'base-7 looking' numbers divided by their actual base-7 values (n) is an integer.
%H Giovanni Resta, <a href="/A032549/b032549.txt">Table of n, a(n) for n = 1..70</a> (terms < 10^12, first 63 terms from Paolo P. Lava)
%t Select[Range@ 300000, Mod[ FromDigits[ IntegerDigits[#, 7]], #] == 0 &] (* _Giovanni Resta_, Oct 21 2019 *)
%Y Cf. A032548, A032550. See also A032532 for explanation.
%K nonn,base
%O 1,2
%A _Patrick De Geest_, Apr 15 1998
%E Offset set to 1 by _Giovanni Resta_, Oct 21 2019
%E Name edited by _Jon E. Schoenfield_, Oct 25 2019
|
