kalmar/PropertyT.jl
1
0
Fork 0
mirror of https://github.com/kalmarek/PropertyT.jl.git synced 2024-12-25 02:15:29 +01:00
Code Issues Releases Wiki Activity

Sparsification of a dense matrix is not required to be rank preserving

Browse Source 
This can bite!
This commit is contained in:
kalmarek 2017-08-27 21:23:14 +02:00
parent 972697e2ba
commit 6df4c790c0
1 changed files with 9 additions and 14 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

23
src/Orbit-wise.jl
View File

@ -72,23 +72,18 @@ function sparsify!{Tv,Ti}(M::SparseMatrixCSC{Tv,Ti}, eps=eps(Tv))
return M
end
function sparsify!{T}(U::AbstractArray{T}, eps=eps(T); check=true)
if check
W = deepcopy(U)
else
W = U
function sparsify!{T}(M::AbstractArray{T}, eps=eps(T); check=false, verbose=false)
densM = dens(M)
rankM = rank(M)
M[abs.(M) .< eps] .= zero(T)
if check && rankM != rank(M)
warn(logger, "Sparsification decreased the rank!")
end
W[abs.(W) .< eps] .= zero(T)
if check
info("Sparsification would decrease the rank!")
W = U
else
info("Sparsified density:", rpad(dens(U), 15), "→", rpad(dens(W),15))
end
W = sparse(W)
return W
return M
end
sparsify{T}(U::AbstractArray{T}, tol=eps(T)) = sparsify!(deepcopy(U), tol)