A115923 Numbers k such that k and 3*k, taken together, are pandigital.

16794, 17694, 20583, 23058, 30582, 32058

Offset: 1

Author

Giovanni Resta, Feb 06 2006

Keywords

• nonn
• base
• fini
• full

Examples

			16794 and 50382=16794*3 together contain all the 10 digits once.
		

Crossrefs

Cf. A054383, A115922, A115924, A115925, A114126, A115927.

Programs

Mathematica

pdQ[n_]:=Sort[Flatten[Join[{IntegerDigits[n],IntegerDigits[3n]}]]] == Range[0,9]; Select[Range[10000,99999],pdQ] (* Harvey P. Dale, Jul 07 2012 *)

PARI

{for(n=10234, 49876, #Set(digits(n))==5||next; #Set(digits(n*3))==5 && #Set(concat(digits(n), digits(n*3)))==10 && print1(n", "))} \\ M. F. Hasler, Feb 08 2014