|
Search: id:A067545
|
|
|
| A067545 |
|
Determinant of an n X n matrix whose diagonal are the first n composite numbers and all other elements are 1's. |
|
+0
1
|
|
| 4, 23, 176, 1513, 14457, 166587, 2248791, 32564154, 503597430, 8788183110, 170834934690, 3490028350200, 74757188482200, 1750213790778600, 42713495459510400, 1084838134027536000, 28630810173210336000
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
EXAMPLE
|
The determinant begins:
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 1 ...
1 1 1 1 1 12 1 ...
|
|
MATHEMATICA
|
Composite[ n_Integer ] := FixedPoint[ n + PrimePi[ # ] + 1 &, n + PrimePi[ n ] + 1 ]; Table[ Det[ DiagonalMatrix[ Table[ Composite[ i ] - 1, {i, 1, n} ] ] + 1 ], {n, 1, 20} ]
|
|
CROSSREFS
|
Sequence in context: A083355 A141763 A025550 this_sequence A004041 A089465 A106174
Adjacent sequences: A067542 A067543 A067544 this_sequence A067546 A067547 A067548
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Robert G. Wilson v (rgwv(AT)rgwv.com), Jan 28 2002
|
|
|
Search completed in 0.002 seconds
|
