|
%I #11 Sep 25 2023 16:26:36
%S 864197523,865749213,867129543,871946523,873526941,893154276,
%T 893472615,893542671,927413865,928175346,941687523,946728153,
%U 951487236,951634782,953721846,956182374,957312468,958126743,963521874,963824715,964785213,971268543,971568234,972835164
%N Numbers m such that both m and m/7 are zeroless pandigital numbers (A050289).
%C There are precisely 24 such numbers.
%C The only number m such that m and m/8 are zeroless pandigital numbers is A050289(362879)=987654312.
%F a(n)=7*A204140(n).
%t Module[{lst=FromDigits/@Permutations[Range[9]],l1,l2},l1=Select[lst,#<141093475&];l2= Select[ lst,#>864*10^6&];Select[l2,MemberQ[l1,#/7]&]] (* _Harvey P. Dale_, Sep 25 2023 *)
%Y Cf. A050289, A204140.
%K nonn,base,fini,full
%O 1,1
%A _Zak Seidov_, Jan 11 2012
|
