This site is supported by donations to The OEIS Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A077008 Legendre symbol (-1,p) where p is the n-th prime. 0
 -1, 1, -1, -1, 1, 1, -1, -1, 1, -1, 1, 1, -1, -1, 1, -1, 1, -1, -1, 1, -1, -1, 1, 1, 1, -1, -1, 1, 1, -1, -1, 1, -1, 1, -1, 1, -1, -1, 1, -1, 1, -1, 1, 1, -1, -1, -1, -1, 1, 1, -1, 1, -1, 1, -1, 1, -1, 1, 1, -1, 1, -1, -1, 1, 1, -1, 1, -1, 1, 1, -1, -1, 1, -1, -1, 1, 1, 1, 1, -1, 1, -1, 1, -1, -1, 1, 1, 1, -1, -1, -1, -1, -1, -1, -1, 1, 1, -1, 1, -1 (list; graph; refs; listen; history; text; internal format)
 OFFSET 2,1 COMMENTS Same as A070750 (where additionally a(1)=0 is included). - Joerg Arndt, Apr 21 2016 LINKS FORMULA a(n) = A070750(n). - Joerg Arndt, Apr 21 2016 MATHEMATICA p = Table[Prime[i], {i, 2, 101}]; Table[JacobiSymbol[p[[j]] - 1, p[[j]]], {j, 1, 100}] a[n_] := (-1)^((Prime[n]-1)/2); Table[a[n], {n, 2, 101}] (* Jean-François Alcover, Apr 20 2016 *) PROG (PARI) a(n)=kronecker(-1, prime(n)) \\ Charles R Greathouse IV, Jun 13 2013 (PARI) a(n)=if(prime(n)%4==1, 1, -1) \\ Charles R Greathouse IV, Jun 13 2013 CROSSREFS Cf. A070750, A039702. Sequence in context: A162511 A157895 A063747 * A158387 A265643 A283131 Adjacent sequences:  A077005 A077006 A077007 * A077009 A077010 A077011 KEYWORD sign,easy AUTHOR Joseph L. Pe, Nov 28 2002 EXTENSIONS Replaced "(p-1,p)" by "(-1,p)" in name, Joerg Arndt, Apr 21 2016 STATUS approved

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

Last modified October 19 11:00 EDT 2019. Contains 328216 sequences. (Running on oeis4.)