|
%I #11 Jun 28 2020 15:11:54
%S 289,379,386,469,649,673,674,869,938,2437,4873,23689,24697,27469,
%T 28369,32689,36289,36794,42673,46873,47629,62497,62749,63289,68329,
%U 79634,82369,84673,86329,93746,348769,364897,376489,487369,673849,684937,689473,736849,837649,843697
%N Numbers with all different digits such that each digit leaves the same nonzero remainder when each is divided into the number.
%C Subsequence of A152824. The sequence contains exactly 40 terms.
%e 869 == 5 (mod 8) == 5 (mod 6) == 5 (mod 9).
%t Select[Range[845000],FreeQ[IntegerDigits[#],0]&&Max[DigitCount[#]]==1&&Length[ Union[Mod[#,IntegerDigits[#]]]]==1&&Mod[#,IntegerDigits[#][[1]]]> 0&] (* _Harvey P. Dale_, Jun 28 2020 *)
%Y Cf. A152824.
%K nonn,base,full,fini
%O 1,1
%A _Pierre CAMI_, Dec 14 2008
%E a(5) corrected and all remaining terms provided by _Jon E. Schoenfield_ and _Zak Seidov_, Dec 14 2008
|
