|
|
A157412
|
|
Triangular read by rows: T(n,m) = J(prime(n),prime(m)) where J is the Jacobi symbol. Each row starts with prime(2) = 3.
|
|
1
|
|
|
0, -1, 0, 1, -1, 0, -1, 1, 1, 0, 1, -1, -1, -1, 0, -1, -1, -1, -1, 1, 0, 1, 1, -1, -1, -1, 1, 0, -1, -1, 1, 1, 1, -1, 1, 0, -1, 1, 1, -1, 1, -1, -1, 1, 0, 1, 1, -1, 1, -1, -1, -1, 1, -1, 0
(list;
table;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
2,1
|
|
COMMENTS
|
Row sums are {0, -1, 0, 1, -2, -3, 0, 1, 0, -1,...}
|
|
LINKS
|
|
|
EXAMPLE
|
0;
-1, 0;
1, -1, 0;
-1, 1, 1, 0;
1, -1, -1, -1, 0;
-1, -1, -1, -1, 1, 0;
1, 1, -1, -1, -1, 1, 0;
-1, -1, 1, 1, 1, -1, 1, 0;
-1, 1, 1, -1, 1, -1, -1, 1, 0;
1, 1, -1, 1, -1, -1, -1, 1, -1, 0;
|
|
MAPLE
|
for n from 2 to 11 do for m from 2 to n do printf("%d, ", numtheory[jacobi](ithprime(n), ithprime(m))) ; od: od:
|
|
MATHEMATICA
|
Flatten[Table[JacobiSymbol[Prime[n], Prime[m]], {n, 2, 11}, {m, 2, n}]](* Zak Seidov, Mar 29 2011 *)
|
|
PROG
|
|
|
CROSSREFS
|
|
|
KEYWORD
|
|
|
AUTHOR
|
|
|
EXTENSIONS
|
Edited by the Associate Editors of the OEIS, Apr 22 2009
|
|
STATUS
|
approved
|
|
|
|