|
|
A025028
|
|
Numbers whose least quadratic nonresidue (A020649) is 23.
|
|
10
|
|
|
10559, 15791, 21118, 31582, 50951, 53231, 53881, 88079, 88919, 92569, 97919, 101902, 102001, 106462, 107762, 123191, 128519, 130729, 138311, 142271, 144169, 158759, 166319, 166609, 167879, 173209, 174599, 176158, 176401, 177838, 185138
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
PROG
|
(PARI) residue(n, m)=local(r); r=0; for(i=1, floor(m/2), if(i^2%m==n, r=1)); r
isA025028(n)=local(a); a=1; forprime(p=2, 19, a=a && residue(p, n)); a=a && !residue(23, n); a \\ Michael B. Porter, Apr 30 2010
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|