|
|
A260052
|
|
Composites whose prime factorization in base 8 is an anagram of the number in base 8.
|
|
11
|
|
|
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
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
EXAMPLE
|
27 = 3^3. In base 8, 33 = 3^3.
|
|
MATHEMATICA
|
Select[Range[10^6], !PrimeQ[#] && Sort@ IntegerDigits[#, 8] == Sort@ Flatten@ IntegerDigits[ Select[ Flatten@ FactorInteger@ #, #>1 &], 8] &] (* Giovanni Resta, Jul 14 2015 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
base,easy,nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|