|
|
A115929
|
|
Numbers k such that k and 4*k, taken together, are zeroless pandigital, that is, use all the digits 1-9 exactly once.
|
|
5
|
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
EXAMPLE
|
3942 and 3942*4=15768 use once all the digits from 1 to 9.
|
|
MATHEMATICA
|
Select[Range[1000, 9999], Union[IntegerDigits[#], IntegerDigits[4 #]] == {1, 2, 3, 4, 5, 6, 7, 8, 9} &] (* Tanya Khovanova, Jul 05 2021 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,base,fini,full
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|