is.idempotent.matrix <- function( x, tol=1e-8 ). {. ###. ### This function returns TRUE if the argument matrix is idempotent,.
確定! 回上一頁