|
Search: id:A067560
|
|
|
| A067560 |
|
Determinant of n X n matrix whose rows are cyclic permutations of 1..non-Prime(n)(A018252). |
|
+0
1
|
|
| 1, -15, -209, 3895, 58828, -987012, -32251150, 1259339776, 33525669556, -973603483875, -54655725143297, 3308661532816640, 125757090803564374, -5201646874854669888, -415867280417850247000, 19065322853430198710625, 898206693379667144028053
(list; graph; listen)
|
|
|
OFFSET
|
1,2
|
|
|
LINKS
|
Leonard Deuler, The n-th nonprime
|
|
EXAMPLE
|
a(4) = 3895 because this is the determinant of [(1,4,6,8), (4,6,8,1), (6,8,1,4), (8,1,4,6)]
|
|
MATHEMATICA
|
NonPrime[n_Integer] := FixedPoint[n + PrimePi[ # ] &, n + PrimePi[n]]; f[n_] := Module[{a = Table[ NonPrime[i], {i, 1, n} ], m = {}, k = 0}, While[k < n, m = Append[m, RotateLeft[a, k]]; k++ ]; Det[m]]; Table[ f[n], {n, 1, 18} ]
|
|
CROSSREFS
|
Sequence in context: A051813 A028230 A122572 this_sequence A019553 A112496 A000483
Adjacent sequences: A067557 A067558 A067559 this_sequence A067561 A067562 A067563
|
|
KEYWORD
|
easy,sign
|
|
AUTHOR
|
Robert G. Wilson v (rgwv(AT)rgwv.com), Jan 29 2002
|
|
|
Search completed in 0.002 seconds
|
