|
|
A260046
|
|
Composites whose prime factorization in base 2 is an anagram of the number in base 2.
|
|
11
|
|
|
25, 159, 175, 242, 245, 287, 303, 319, 459, 500, 575, 591, 623, 679, 687, 699, 735, 763, 1135, 1167, 1203, 1243, 1247, 1271, 1351, 1371, 1391, 1525, 1631, 1734, 1911, 2167, 2173, 2231, 2285, 2295, 2319, 2359, 2463, 2471, 2495, 2519, 2743, 2779, 2787, 2863, 2890
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
EXAMPLE
|
25 = 5^2. In base 2, 11001 = 101^10.
|
|
MATHEMATICA
|
Select[Range[10^6], !PrimeQ[#] && Sort@ IntegerDigits[#, 2] == Sort@ Flatten@ IntegerDigits[ Select[ Flatten@ FactorInteger@ #, #>1 &], 2] &] (* Giovanni Resta, Jul 14 2015 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
base,easy,nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|