A037442 Positive numbers having the same set of digits in base 8 and base 10.
1, 2, 3, 4, 5, 6, 7, 614, 1124, 1233, 1273, 1653, 2154, 2466, 3160, 3161, 3162, 3163, 3164, 3165, 3166, 3167, 3226, 4100, 4711, 5117, 5213, 5421, 6414, 6541, 7105, 7125, 7135, 7151, 7671, 10241, 11257, 11625, 11662, 11726, 13000, 13271, 13320
Offset: 1
Examples
1233 is in the sequence because 1233 in base 8 is 2321.
Links
- John Cerkan, Table of n, a(n) for n = 1..10000
Programs
-
Mathematica
Select[Range@ 13400, Union@ IntegerDigits[#, 8] == Union@ IntegerDigits@ # &] (* Michael De Vlieger, Feb 18 2017 *)
-
PARI
isok(n) = Set(digits(n, 8)) == Set(digits(n)); \\ Michel Marcus, Feb 18 2017
Extensions
More terms from Don Reble, Apr 28 2006
Edited by John Cerkan, Feb 17 2017