|
Search: id:A157412
|
|
|
| A157412 |
|
Triangular read by rows: T(n,m)=JacobiSymbol(prime(n)/prime(m)). |
|
+0
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; listen)
|
|
|
OFFSET
|
2,1
|
|
|
COMMENT
|
Row sums are {0, -1, 0, 1, -2, -3, 0, 1, 0, -1,...}
|
|
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
|
Table[Table[JacobiSymbol[Prime[n], Prime[m]], {m, 2, n}], {n, 2, 11}]; Flatten[%]
|
|
CROSSREFS
|
Cf. A110242.
Sequence in context: A123640 A022924 A144612 this_sequence A023532 A112690 A115971
Adjacent sequences: A157409 A157410 A157411 this_sequence A157413 A157414 A157415
|
|
KEYWORD
|
tabl,sign
|
|
AUTHOR
|
Roger L. Bagula (rlbagulatftn(AT)yahoo.com), Feb 28 2009
|
|
EXTENSIONS
|
Edited by the Associate Editors of the OEIS, Apr 22 2009
|
|
|
Search completed in 0.002 seconds
|
