%I A057243
%S A057243 1,2,6,13,58,169,2197,4069,4303,28561,52897,89078,122681,145457,234526,
%T A057243 371293,442074,687661
%N A057243 Numbers n such that n | 8^n + 7^n + 6^n + 5^n.
%t A057243 Select[ Range[ 1, 10^5 ], Mod[ PowerMod[ 8, #, # ] + PowerMod[ 7, #, 
               # ] + PowerMod[ 6, #, # ] + PowerMod[ 5, #, # ], # ] == 0 & ]
%Y A057243 Sequence in context: A124124 A052450 A001373 this_sequence A012470 A056592 
               A091719
%Y A057243 Adjacent sequences: A057240 A057241 A057242 this_sequence A057244 A057245 
               A057246
%K A057243 nonn
%O A057243 1,2
%A A057243 Robert G. Wilson v (rgwv(AT)rgwv.com), Sep 20 2000