A115924 Numbers k such that k and 4*k, taken together, are pandigital.

15237, 17235, 17352, 20394, 20439, 21735, 23517, 23715

Offset

1,1

Links

Table of n, a(n) for n=1..8.

Example

15237 and 60948=15237*4 together contain all the 10 digits once.

Mathematica

Select[Range[10234, 24987], Sort[Join[IntegerDigits[4 #], IntegerDigits[ #]]] == Range[0, 9]&] (* Harvey P. Dale, Jun 01 2017 *)

Prog

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

Crossrefs

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

Sequence in context: A105924 A259395 A233924 * A251952 A205996 A296087

Adjacent sequences: A115921 A115922 A115923 * A115925 A115926 A115927

Keyword

nonn,base,fini,full

Author

Giovanni Resta, Feb 06 2006

Status

approved