The OEIS is supported by the many generous donors to the OEIS Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A282040 Let p = n-th prime == 7 mod 8; a(n) = sum of quadratic residues mod p that are > p/2. 5
 4, 59, 126, 285, 679, 953, 1706, 2675, 3709, 4269, 5551, 6480, 8488, 8858, 11194, 12212, 15103, 20665, 23511, 24153, 30197, 32733, 38458, 36913, 42643, 42032, 59638, 64987, 70396, 70887, 85606, 94192, 95522, 99930, 123090, 117932, 130367, 134436, 141262, 149395, 169769, 167663, 175469 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,1 LINKS Table of n, a(n) for n=1..43. Aebi, Christian, and Grant Cairns. Sums of Quadratic residues and nonresidues, arXiv preprint arXiv:1512.00896 (2015). MAPLE with(numtheory): Ql:=[]; Qu:=[]; Q:=[]; Nl:=[]; Nu:=[]; N:=[]; for i1 from 1 to 300 do p:=ithprime(i1); if (p mod 8) = 7 then ql:=0; qu:=0; q:=0; nl:=0; nu:=0; n:=0; for j from 1 to p-1 do if legendre(j, p)=1 then q:=q+j; if j

p/2 && JacobiSymbol[#, p] == 1, #, 0]& /@ Range[p-1]]; sum /@ Select[Range[7, 1000, 8], PrimeQ] (* Jean-François Alcover, Aug 31 2018 *) CROSSREFS Cf. A282035-A282043 and A282721-A282727. Sequence in context: A290765 A144992 A198511 * A245827 A200048 A037066 Adjacent sequences: A282037 A282038 A282039 * A282041 A282042 A282043 KEYWORD nonn AUTHOR N. J. A. Sloane, Feb 20 2017 STATUS approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified September 8 02:36 EDT 2024. Contains 375749 sequences. (Running on oeis4.)