|
%I #5 Mar 14 2018 03:51:01
%S 3,7,31,71,103,151,199,239,271,311,359,463,599,719,823,839,911,1063,
%T 1231,1279,1303,1439,1559,1871,1879,1951,1999,2143,2239,2311,2351,
%U 2383,2399,2551,2711,2791,3191,3391,3463,3559,3583,3823,3911,3919,4079,4159
%N Prime numbers where the sequence of largest quadratic residues modulo the primes (A088190) is non-monotonic.
%C From the second term on, these primes are always ==7 mod 8. (Tested for the first 20000 primes)
%o (PARI) qrp_p_nm(to)= {/* The primes where the sequence of the largest QR modulo the primes is non-monotonic */ local(m,k=1,p,v=[]); for(i=2,to,m=1; p=prime(i); j=2; while((j<=(p-1)/2)&&(m<p-1),m=max(m,(j^2)%p); j++); if((m-k)<=0,v=concat(v,p)); k=m); print(v) }
%Y Cf. A088190, A088191, A088192, A088194, A088195.
%K easy,nonn
%O 1,1
%A Ferenc Adorjan (fadorjan(AT)freemail.hu), Sep 22 2003
|
