OFFSET
1,2
COMMENTS
PROG
(PARI) qrp_d(to)= {/* Difference sequence of the largest QR modulo the primes */ 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++); v=concat(v, m-k); k=m); print(v) }
CROSSREFS
KEYWORD
easy,sign
AUTHOR
Ferenc Adorjan (fadorjan(AT)freemail.hu), Sep 22 2003
STATUS
approved