A260052 Composites whose prime factorization in base 8 is an anagram of the number in base 8.
27, 85, 169, 175, 771, 4369, 4803, 5359, 6805, 7339, 19405, 21689, 24433, 36526, 40405, 40799, 41723, 41773, 43999, 44353, 46131, 47447, 48819, 49917, 54965, 71047, 74273, 87823, 107892, 130683, 131026, 139157, 246977, 268885, 269977
Offset: 1
Examples
27 = 3^3. In base 8, 33 = 3^3.
Links
- Giovanni Resta, Table of n, a(n) for n = 1..10000
Crossrefs
Programs
-
Mathematica
Select[Range[10^6], !PrimeQ[#] && Sort@ IntegerDigits[#, 8] == Sort@ Flatten@ IntegerDigits[ Select[ Flatten@ FactorInteger@ #, #>1 &], 8] &] (* Giovanni Resta, Jul 14 2015 *)