|
|
A258368
|
|
Smallest odd prime p such that A258367(p) = n, or 0 if no such p exists.
|
|
1
|
|
|
1093, 3, 17, 11, 59, 13, 571, 1451, 19, 41, 911, 197, 349, 227, 29, 113, 257, 223, 37, 739, 97, 109, 47, 719, 83, 179, 6619, 3361, 73, 283, 79, 401, 199, 39929, 229, 277, 17667847, 281, 29759, 293, 887, 157, 137, 1709
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,1
|
|
COMMENTS
|
Is a(n) > 0 for all n?
|
|
LINKS
|
|
|
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
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|