kalmar/GroupsWithPropertyT
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

dispatch sparsify! on the type of matrix

Browse Source
This commit is contained in:
kalmar 2017-06-09 11:56:17 +02:00
parent 0eae65169e
commit d64ba34407
1 changed files with 16 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

20
Orb_AutFN.jl
View File

@ -34,11 +34,23 @@ immutable Settings
tol::Float64
end
function sparsify!{T}(U::AbstractArray{T}, eps=eps(T))
# n = rank(U)
function sparsify!{T}(U::Array{T}, eps=eps(T))
n = rank(U)
W = deepcopy(U)
W[abs.(W) .< eps] = zero(T)
if rank(W) != n
warn("Sparsification would decrease the rank!")
W = U
end
U = sparse(U)
dropzeros!(U)
return U
end
function sparsify!{T}(U::SparseMatrixCSC{T}, eps=eps(T))
U[abs.(U) .< eps] = zero(T)
# @assert rank(U) == n
return sparse(U)
dropzeros!(U)
return U
end
sparsify{T}(U::AbstractArray{T}, eps=eps(T)) = sparsify!(deepcopy(U), eps)