A037441 Positive numbers having the same set of digits in base 8 and base 9.
1, 2, 3, 4, 5, 6, 7, 124, 177, 283, 568, 769, 906, 946, 1528, 1749, 1811, 1812, 1978, 2759, 3372, 3381, 4221, 5112, 5231, 6656, 6791, 6849, 6976, 7016, 7183, 7887, 8080, 8280, 8649, 8858, 8867, 8912, 8921, 8922, 8932, 10325, 10381, 10409, 10577
Offset: 1
Examples
283 is in the sequence because 283 in base 8 is 433 and in base 9 it is 344.
Links
- John Cerkan, Table of n, a(n) for n = 1..10000
Programs
-
Mathematica
Select[Range@ 11000, Union@ IntegerDigits[#, 8] == Union@ IntegerDigits[#, 9] &] (* Michael De Vlieger, Feb 18 2017 *)
-
PARI
isok(n) = Set(digits(n, 8)) == Set(digits(n, 9)); \\ Michel Marcus, Feb 18 2017
Extensions
More terms from Don Reble, Apr 28 2006
Edited by John Cerkan, Feb 17 2017