A037423 Positive numbers having the same set of digits in base 4 and base 5.
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
Links
- John Cerkan, Table of n, a(n) for n = 1..10000
Programs
-
Mathematica
Select[Range@ 1400, Union@ IntegerDigits[#, 4] == Union@ IntegerDigits[#, 5] &] (* Michael De Vlieger, Feb 07 2017 *)
-
PARI
is(n)=Set(digits(n, 4))==Set(digits(n, 5)) \\ Charles R Greathouse IV, Feb 11 2017
Extensions
Edited by Don Reble, Apr 28 2006
Name edited by John Cerkan, Feb 06 2017