login
A037423
Positive numbers having the same set of digits in base 4 and base 5.
2
1, 2, 3, 28, 37, 76, 132, 137, 152, 167, 183, 205, 210, 217, 280, 380, 407, 411, 413, 431, 441, 451, 455, 657, 660, 676, 692, 710, 711, 713, 717, 888, 903, 915, 917, 918, 933, 941, 957, 1035, 1051, 1075, 1076, 1258, 1266, 1278, 1282, 1286, 1291, 1305
OFFSET
1,2
MATHEMATICA
Select[Range@ 1400, Union@ IntegerDigits[#, 4] == Union@ IntegerDigits[#, 5] &] (* Michael De Vlieger, Feb 07 2017 *)
PROG
(PARI) is(n)=Set(digits(n, 4))==Set(digits(n, 5)) \\ Charles R Greathouse IV, Feb 11 2017
CROSSREFS
Sequence in context: A279995 A279600 A280140 * A009249 A012697 A191470
KEYWORD
nonn,base
EXTENSIONS
Edited by Don Reble, Apr 28 2006
Name edited by John Cerkan, Feb 06 2017
STATUS
approved