OFFSET
1,1
PROG
(PARI) a(n) = my(b=2); while(1, forprime(p=3, b-1, if(Mod(b, p^n)^(p-1)==1, return(b))); b++)
CROSSREFS
KEYWORD
nonn,more
AUTHOR
Felix Fröhlich, Jan 15 2016
EXTENSIONS
a(11) from Michael S. Branicky, May 19 2022
a(12) from Michael S. Branicky, May 21 2022
STATUS
approved