x <- Matrix(rnorm(9), 3, 3)
rcond(x)
rcond(hilbert(9)) # should be about 9.1e-13
h9 <- hilbert(9)
class(h9) <- Matrix.class(h9) # now Hermitian
rcond(h9) # slightly different answer - different algorithm
Run the code above in your browser using DataLab