OFFSET
0,1
COMMENTS
Is a(n) > 0 for all n?
PROG
(PARI) a258367(n) = a=0; while(Mod(2, n^2)^((n-1)/2)!=1+a*n && Mod(2, n^2)^((n-1)/2)!=-1+a*n && Mod(2, n^2)^((n-1)/2)!=1-a*n && Mod(2, n^2)^((n-1)/2)!=-1-a*n, a++); a
for(n=0, 40, p=3; while(a258367(p)!=n, p=nextprime(p+1)); print1(p, ", "))
CROSSREFS
KEYWORD
nonn,more
AUTHOR
Felix Fröhlich, May 28 2015
EXTENSIONS
a(36)-a(43) from Giovanni Resta, Jun 15 2015
STATUS
approved