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,2

Links

John Cerkan, Table of n, a(n) for n = 1..10000

Example

1233 is in the sequence because 1233 in base 8 is 2321.

Mathematica

Select[Range@ 13400, Union@ IntegerDigits[#, 8] == Union@ IntegerDigits@ # &] (* Michael De Vlieger, Feb 18 2017 *)

Prog

(PARI) isok(n) = Set(digits(n, 8)) == Set(digits(n)); \\ Michel Marcus, Feb 18 2017

Crossrefs

Subsequence of A037406.

Cf. A007094

Sequence in context: A240466 A141769 A004891 * A004902 A004913 A062945

Adjacent sequences: A037439 A037440 A037441 * A037443 A037444 A037445

Keyword

nonn,base

Author

Clark Kimberling

Extensions

More terms from Don Reble, Apr 28 2006

Edited by John Cerkan, Feb 17 2017

Status

approved