A115925 Numbers k such that k and 5*k, taken together, are pandigital.
13458, 13584, 13854, 14538, 14586, 14658, 15384, 15846, 15864, 18534, 18546, 18654, 20697, 20769, 20937, 20967, 20973, 26097, 26956, 26958, 26970, 27096, 27609, 27690, 29076, 29356, 29358, 29370, 29536, 29538, 29566, 29586, 29607, 29670, 29706, 29730, 30972, 32097, 32956
Offset: 1
Examples
13458 and 67290=13458*5 together contain all the 10 digits once.
Programs
-
Mathematica
pdQ[n_]:=Module[{idn=IntegerDigits[n],idn5=IntegerDigits[5n]},Union[Join[idn,idn5]]==Range[0,9]] Select[Range[50000],pdQ] (* Harvey P. Dale, Mar 06 2011 *)
Extensions
More terms from Harvey P. Dale, Mar 06 2011