A023073 Positive numbers k such that k and 2*k are anagrams in base 8 (written in base 8).
25, 250, 275, 1042, 1204, 1463, 2041, 2104, 2500, 2525, 2750, 2775, 3146, 3567, 3657, 10042, 10204, 10402, 10420, 10742, 12004, 12040, 12074, 12245, 12452, 14063, 14306, 14603, 14630, 14637, 14736, 14763, 16043, 16304, 16347, 17346, 17463, 20041, 20104
Offset: 1
Links
- Amiram Eldar, Table of n, a(n) for n = 1..10000
Crossrefs
Cf. A007094.
Programs
-
Mathematica
FromDigits[IntegerDigits[#, 8]] & /@ Select[Range[30000], SameQ @@ Sort /@ IntegerDigits[{#, 2*#}, 8] &] (* Amiram Eldar, Aug 07 2025 *)