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,2,3,9,27,69,81,146,243,729,2187,3358,3753,6561,9153,10658,14337,
%T 16767,19683,21627,59049,177147,193671,531441,778034,845883
%N Numbers n such that n | 9^n + 8^n + 1.
%t Select[ Range[ 10^6 ], Mod[ PowerMod[ 9, #, # ] + PowerMod[ 8, #, # ] + 1, # ] == 0 & ]
%K nonn
%O 1,2
%A _Robert G. Wilson v_, Sep 22 2000