|
Search: id:A088199
|
|
| |
|
| 73, 193, 241, 313, 433, 601, 1033, 1129, 1153, 1201, 1321, 1489, 1609, 1873, 2089, 2113, 2593, 2689, 2713, 3001, 3049, 3121, 3169, 3361, 3529, 3673, 3769, 3889, 4129, 4273, 4729, 4801, 4969, 5233, 5281, 5449, 5521, 5569, 5641, 5689, 5881, 6361, 6553
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
COMMENT
|
The members of the sequence are always ==1 modulo 8 (conjectured!)
|
|
PROGRAM
|
(PARI) qnrp_p_nm(n)= {/* The primes where the sequence of the largest QnR modulo the primes is non monotonic */ local(k=1, m, p, fl, jj, j, v=[]); for(i=2, n, m=0; p=prime(i); jj=0; fl=2^p-1; j=2; while((j<=(p-1)/2), jj=(j^2)%p; fl-=2^jj; j++); j=p-1; while(m==0, if(bitand(2^j, fl), m=j); j--); if(m-k<=0, v=concat(v, p)); k=m); print(v)}
|
|
CROSSREFS
|
Cf. A088193, A088196, A088197, A088198, A088200, A088201.
Sequence in context: A044786 A142550 A142741 this_sequence A140010 A122723 A089786
Adjacent sequences: A088196 A088197 A088198 this_sequence A088200 A088201 A088202
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Ferenc Adorjan (fadorjan(AT)freemail.hu), Sep 23 2003
|
|
|
Search completed in 0.002 seconds
|