OFFSET
1,2
LINKS
Giovanni Resta, Table of n, a(n) for n = 1..100
MATHEMATICA
Select[Range[10^5], Mod[PowerMod[9, #, #] + 9, #] == 0 &] (* Giovanni Resta, Oct 23 2018 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
EXTENSIONS
Missing a(2)-a(4) from Giovanni Resta, Oct 23 2018
STATUS
approved