|
%I #14 Jul 04 2021 14:49:49
%S 1,2,3,4,5,6,7,8,9,1089,2178,21978
%N Numbers n with distinct digits such that n divides the reversal of n.
%C The definition implies that n does not end in 0.
%C There are no terms with 6 digits.
%C Sequence is complete. - _Giovanni Resta_, Mar 20 2013
%t Select[FromDigits/@(Flatten[Permutations/@Subsets[Range[0,9],5],1]), Divisible[ IntegerReverse[#],#]&]//Quiet//Union (* _Harvey P. Dale_, Jan 12 2020 *)
%Y Cf. A214927, A223080, A223082, A222810.
%K nonn,fini,full,base
%O 1,2
%A _N. J. A. Sloane_, Mar 20 2013
|
