|
Search: id:A067546
|
|
|
| A067546 |
|
Determinant of an n X n matrix whose diagonal are the first n non-Prime numbers and all other elements are 1's. |
|
+0
1
|
|
| 1, 3, 15, 105, 840, 7560, 83160, 1081080, 15135120, 227026800, 3859455600, 73329656400, 1466593128000, 30798455688000, 708364480824000, 17000747539776000, 425018688494400000, 11050485900854400000
(list; graph; listen)
|
|
|
OFFSET
|
1,2
|
|
|
EXAMPLE
|
The determinant begins:
1 1 1 1 1 1 1 ...
1 4 1 1 1 1 1 ...
1 1 6 1 1 1 1 ...
1 1 1 8 1 1 1 ...
1 1 1 1 9 1 1 ...
1 1 1 1 1 10 1 ...
|
|
MATHEMATICA
|
NonPrime[ n_Integer ] := FixedPoint[ n + PrimePi[ # ] &, n + PrimePi[ n ] ]; Table[ Det[ DiagonalMatrix[ Table[ NonPrime[ i ] - 1, {i, 1, n} ] ] + 1 ], {n, 1, 20} ]
|
|
CROSSREFS
|
Sequence in context: A025547 A088989 A001801 this_sequence A015682 A001147 A000268
Adjacent sequences: A067543 A067544 A067545 this_sequence A067547 A067548 A067549
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Robert G. Wilson v (rgwv(AT)rgwv.com), Jan 28 2002
|
|
|
Search completed in 0.002 seconds
|
