OFFSET
1,2
LINKS
Rémy Sigrist, Table of n, a(n) for n = 1..10000
MATHEMATICA
Select[Range[1500], Union[IntegerDigits[#, 3]]==Union[IntegerDigits[#, 6]]&] (* Harvey P. Dale, Nov 06 2012 *)
PROG
(PARI) isok(n) = Set(digits(n, 3)) == Set(digits(n, 6)); \\ Michel Marcus, Jan 22 2017
CROSSREFS
KEYWORD
nonn,base
AUTHOR
EXTENSIONS
Corrected by Don Reble, Apr 28 2006
STATUS
approved