%I A161600
%S A161600 1,4,6,8,9,22,26,33,39,44,46,55,62,66,69,77,82,86,88,93,99,121,143,169,
%T A161600 187,202,206,226,242,252,253,262,286,299,303,309,339,341,343,363,393,
%U A161600 404,422,446,451,466,473,482,484,505,525,583
%N A161600 Nonprime numbers such that TITO(n) = n, where TITO(n) = A161594(n).
%H A161600 T. Khovanova, <a href="http://blog.tanyakhovanova.com/?p=144">Turning 
               Numbers Inside Out</a> [From Tanya Khovanova (tanyakh(AT)yahoo.com), 
               Jul 07 2009]
%t A161600 reversepower[{n_, k_}] := FromDigits[Reverse[IntegerDigits[n]]]^k f[n_] 
               := FromDigits[ Reverse[IntegerDigits[Times @@ Map[reversepower, FactorInteger[n]]]]] 
               Select[Range[600], f[ # ] == # && ! PrimeQ[ # ] &]
%Y A161600 Sequence in context: A024370 A121719 A162738 this_sequence A032350 A078337 
               A046351
%Y A161600 Adjacent sequences: A161597 A161598 A161599 this_sequence A161601 A161602 
               A161603
%K A161600 nonn,base,more
%O A161600 0,2
%A A161600 J. H. Conway & Tanya Khovanova (tanyakh(AT)yahoo.com), Jun 14 2009
%E A161600 Edited by N. J. A. Sloane, Jun 23 2009