|
Search: id:A071079
|
|
|
| A071079 |
|
Determinant of the n X n matrix whose element (i,j) equals the |i-j|_th prime or if i=j, 0. |
|
+0
1
|
|
| 0, -4, 24, -135, 696, -3577, 8738, -21120, 7182, 85995, 307692, -4739379, 72588316, 1042545852, 13023653868, -40433805531, -160245671048, 2415459163787, 80057252715814, -4733090488738644
(list; graph; listen)
|
|
|
OFFSET
|
1,2
|
|
|
MATHEMATICA
|
f[n_] := Det[ Table[ If[ i == j, 0, Prime[ Abs[i - j]]], {i, 1, n}, {j, 1, n}]]; Table[ f[n], {n, 1, 20}]
|
|
CROSSREFS
|
Sequence in context: A103455 A048180 A057391 this_sequence A153337 A122690 A005319
Adjacent sequences: A071076 A071077 A071078 this_sequence A071080 A071081 A071082
|
|
KEYWORD
|
sign
|
|
AUTHOR
|
Robert G. Wilson v (rgwv(AT)rgwv.com), May 26 2002
|
|
|
Search completed in 0.002 seconds
|
