Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.
%I #3 Mar 30 2012 17:30:27
%S 1,3,9,17,27,51,81,153,243,289,459,729,867,1003,1377,1853,2187,2601,
%T 4131,4913,5253,6561,7803,12393,13203,14739,15759,19683,23409,34263,
%U 37179,39609,40749,44217,46089,47277,51273,59049,61863,70227,83521
%N Numbers n such that n | 11^n + 10^n + 9^n + 8^n + 7^n + 6^n.
%t Select[ Range[ 10^5 ], Mod[ PowerMod[ 11, #, # ] + PowerMod[ 10, #, # ] + PowerMod[ 9, #, # ] + PowerMod[ 8, #, # ] + PowerMod[ 7, #, # ] + PowerMod[ 6, #, # ], # ] == 0 & ]
%K nonn
%O 1,2
%A _Robert G. Wilson v_, Sep 21 2000