|
|
A115923
|
|
Numbers k such that k and 3*k, taken together, are pandigital.
|
|
5
|
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
Table of n, a(n) for n=1..6.
|
|
EXAMPLE
|
16794 and 50382=16794*3 together contain all the 10 digits once.
|
|
MATHEMATICA
|
pdQ[n_]:=Sort[Flatten[Join[{IntegerDigits[n], IntegerDigits[3n]}]]] == Range[0, 9]; Select[Range[10000, 99999], pdQ] (* Harvey P. Dale, Jul 07 2012 *)
|
|
PROG
|
(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
|
|
CROSSREFS
|
Cf. A054383, A115922, A115924, A115925, A114126, A115927.
Sequence in context: A183844 A034820 A053074 * A243836 A244107 A264183
Adjacent sequences: A115920 A115921 A115922 * A115924 A115925 A115926
|
|
KEYWORD
|
nonn,base,fini,full
|
|
AUTHOR
|
Giovanni Resta, Feb 06 2006
|
|
STATUS
|
approved
|
|
|
|