login
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
3942, 4392, 5796, 7956
OFFSET
1,1
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
Giovanni Resta, Feb 06 2006
STATUS
approved