|
| |
|
|
A025025
|
|
Least non-residue mod n is 13.
|
|
0
| |
|
|
479, 958, 1151, 1319, 2302, 2351, 2638, 2689, 3529, 3671, 3911, 4702, 4751, 4919, 5378, 5519, 5569, 6599, 7058, 7342, 7559, 7561, 7681, 7822, 8951, 9241, 9502, 9601, 9719, 9769, 9838, 11038, 11138, 12049, 12239, 12721, 12911, 13151, 13198, 14159
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
PROG
| Contribution from Michael B. Porter (michael_b_porter(AT)yahoo.com), Apr 30 2010: (Start)
(PARI) residue(n, m)={local(r); r=0; for(i=1, floor(m/2), if(i^2%m==n, r=1)); r}
isA025025(n)={local(a); a=1; forprime(p=2, 11, a=a && residue(p, n)); a=a && !residue(13, n); a} (End)
|
|
|
CROSSREFS
| Sequence in context: A122268 A186950 A056987 * A108256 A115157 A019287
Adjacent sequences: A025022 A025023 A025024 * A025026 A025027 A025028
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| David W. Wilson (davidwwilson(AT)comcast.net)
|
| |
|
|
