%I A057239
%S A057239 1,2,3,7,9,21,27,49,57,63,81,119,147,171,189,243,343,399,441,446,513,
%T A057239 567,729,1029,1083,1197,1323,1539,1701,2187,2401,2793,2943,2979,3087,
%U A057239 3249,3591,3969,4617,5103,5831,6561,7047,7203,7581,7791,8001,8379,8829
%N A057239 Numbers n such that n | 12^n + 11^n + 10^n + 9^n.
%t A057239 Select[ Range[ 1, 10^5 ], Mod[ PowerMod[ 12, #, # ] + PowerMod[ 11, #, 
               # ] + PowerMod[ 10, #, # ] + PowerMod[ 9, #, # ], # ] == 0 & ]
%Y A057239 Sequence in context: A165803 A007649 A046152 this_sequence A024541 A123481 
               A107861
%Y A057239 Adjacent sequences: A057236 A057237 A057238 this_sequence A057240 A057241 
               A057242
%K A057239 nonn
%O A057239 1,2
%A A057239 Robert G. Wilson v (rgwv(AT)rgwv.com), Sep 20 2000