login
Composites whose prime factorization in base 11 is an anagram of the number in base 11.
11

%I #14 Jul 24 2015 03:54:40

%S 4617,7047,18193,33534,180803,196352,217147,283983,386391,422144,

%T 448147,616977,705875,842967,886250,926336,947125,954747,1169536,

%U 1235875,1373375,1866955,1883049,1968259

%N Composites whose prime factorization in base 11 is an anagram of the number in base 11.

%H Giovanni Resta, <a href="/A260054/b260054.txt">Table of n, a(n) for n = 1..10000</a>

%e 4617 = 3^5 * 19. In base 11, 3518 = 3^5 * 18.

%t Select[Range[10^6], !PrimeQ[#] && Sort@ IntegerDigits[#, 11] == Sort@ Flatten@ IntegerDigits[ Select[ Flatten@ FactorInteger@ #, #>1 &], 11] &] (* _Giovanni Resta_, Jul 14 2015 *)

%Y Cf. A260046, A260047, A260048, A260049, A260050, A260051, A260052, A260053, A025283, A260055.

%K base,easy,nonn

%O 1,1

%A _Stephen Tucker_, Jul 14 2015