cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

Showing 1-3 of 3 results.

A179071 Chapman's "evil" determinants I.

Original entry on oeis.org

1, -2, 1, 1, -18, -4, 1, 1, -70, 1, -882, -32, 1, 1, -182, 1, -29718, 1, 1, -1068, 1, 1, -500, -5604, -4030, 1, 1, -8890182, -776, 1, 1, -1744, 1, -113582, 1, -4832118, 1, 1, -1118, 1, -1111225770, 1, -1764132, -11018, 1, 1, 1, 1, -20000849130, -23156, 1
Offset: 2

Views

Author

Jonathan Sondow and Wadim Zudilin, Jun 29 2010

Keywords

Comments

Determinant of the (k+1)X(k+1) matrix with (i,j)-entry L((j-i)/p), where L(./p) denotes the Legendre symbol modulo p and p = p_n = 2k+1 is the n-th prime.
Guy says "Chapman has a number of conjectures which concern the distribution of quadratic residues." One is that if p_n == 3 (mod 4), then a(n) = 1. Chapman also has a conjecture if p_n == 1 (mod 4), involving the fundamental unit and class number of the quadratic field Q(sqrt(p)). (Added Aug 23 2011: Both conjectures have been proved by Vsemirnov.)
It appears that a(n) is negative and even, if p_n == 1 (mod 4); see A179073. (Added Aug 28 2011: This conjecture has also been proved by Vsemirnov.)

Examples

			p_3 = 5 = 2*2+1 and the (2+1)-by-(2+1) matrix (L((j-i)/5)) is
   0,  1, -1
   1,  0,  1
  -1,  1,  0
which has determinant -2, so a(3) = -2.
		

References

  • Richard Guy, Unsolved Problems in Number Theory, 3rd ed., Springer, 2004, Section F5.

Crossrefs

Cf. A179072 (Chapman's "evil" determinants II), A179073 (A179071 for p == 1 (mod 4)), A179074 (A179072 for p == 1 (mod 4)).

Programs

  • Mathematica
    a[n_] := Module[{p, k}, p = Prime[n]; k = (p-1)/2; Det @ Table[JacobiSymbol[ j-i, p], {i, 1, k+1}, {j, 1, k+1}]];
    Table[a[n], {n, 2, 52}] (* Jean-François Alcover, Nov 18 2018 *)
  • PARI
    a(n) = my(p=prime(n), k=(p+1)/2); matdet(matrix(k, k, i, j, kronecker(j-i, p))); \\ Michel Marcus, Aug 25 2021

A179072 Chapman's "evil" determinants II.

Original entry on oeis.org

-1, -2, 0, 0, -32, 256, 0, 0, -8192, 0, -262144, 5242880, 0, 0, -33554432, 0, -2684354560, 0, 0, 8589934592000, 0, 0, 932385860354048, 160159261748363264, -1125899906842624, 0, 0, -225179981368524800, 5260204364768739328, 0, 0
Offset: 2

Views

Author

Jonathan Sondow and Wadim Zudilin, Jun 29 2010

Keywords

Comments

Determinant of the k-by-k matrix with (i,j)-entry L((i+j)/p), where L(./p) denotes the Legendre symbol modulo p and p = p_n = 2k+1 is the n-th prime.
Guy says "Chapman has a number of conjectures which concern the distribution of quadratic residues." One is that if 3 < p_n == 3 (mod 4), then a(n) = 0.
It appears that a(n) is even, if p_n == 1 (mod 4).
For any odd prime p, (p+1)/2-i+(p+1)/2-j == -(i+j-1) (mod p) and hence we have L(-1/p)*|L((i+j)/p)|{i,j=1,...,(p-1)/2} = |L((i+j-1)/p)|{i,j=1,...,(p-1)/2}. Thus the value of a(n) was actually determined in the first reference of R. Chapman. - Zhi-Wei Sun, Aug 21 2013

Examples

			p_4 = 7 = 2*3 + 1 and the 3 X 3 matrix (L((i+j)/7)) is
   1, -1,  1
  -1,  1, -1
   1, -1, -1
which has determinant 0, so a(4) = 0.
		

References

  • Richard Guy, Unsolved Problems in Number Theory, 3rd ed., Springer, 2004, Section F5.

Crossrefs

Cf. A179071 (Chapman's "evil" determinants I), A179073 (A179071 for p == 1 (mod 4)), A179074 (A179072 for p == 1 (mod 4)).

Programs

  • Mathematica
    a[n_] := Module[{p, k}, p = Prime[n]; k = (p-1)/2; Det @ Table[JacobiSymbol[ i + j, p], {i, 1, k}, {j, 1, k}]];
    Table[a[n], {n, 2, 32}] (* Jean-François Alcover, Nov 18 2018 *)

A179073 A179071 for p == 1 (mod 4).

Original entry on oeis.org

-2, -18, -4, -70, -882, -32, -182, -29718, -1068, -500, -5604, -4030, -8890182, -776, -1744, -113582, -4832118, -1118, -1111225770, -1764132, -11018, -20000849130, -23156, -71011068, -16432, -2205718, -8920484118, -1063532
Offset: 1

Views

Author

Jonathan Sondow and Wadim Zudilin, Jun 29 2010

Keywords

Comments

It appears that a(n) is negative and even. (Added Aug 28 2011: This conjecture has been proved by Maxim Vsemirnov.)

Crossrefs

Programs

  • Mathematica
    a71[p_] := Module[{k}, k = (p-1)/2; Det @ Table[JacobiSymbol[j-i, p], {i, 1, k+1}, {j, 1, k+1}]];
    a71 /@ Select[Range[1, 301, 4], PrimeQ] (* Jean-François Alcover, Dec 05 2018 *)
Showing 1-3 of 3 results.