login
A037424
Positive numbers having the same set of digits in base 4 and base 6.
1
1, 2, 3, 55, 73, 91, 117, 121, 127, 264, 288, 289, 290, 291, 294, 306, 327, 343, 487, 489, 541, 558, 697, 721, 727, 729, 733, 738, 1296, 1297, 1298, 1299, 1304, 1335, 1341, 1346, 1351, 1368, 1376, 1380, 1388, 1404, 1419, 1521, 1560, 1587, 1731
OFFSET
1,2
MATHEMATICA
Select[Range@ 1800, Union@ IntegerDigits[#, 4] == Union@ IntegerDigits[#, 6] &] (* Michael De Vlieger, Feb 07 2017 *)
PROG
(PARI) is(n)=Set(digits(n, 4))==Set(digits(n, 6)) \\ Charles R Greathouse IV, Feb 11 2017
CROSSREFS
Sequence in context: A339920 A376522 A344732 * A155088 A072871 A041709
KEYWORD
nonn,base
EXTENSIONS
Corrected by Don Reble, Apr 28 2006
Name edited by John Cerkan, Feb 06 2017
STATUS
approved