sparsecrush.m

MATLAB二维电阻抗断层成像算法!用于医学成像,里面包括有限元剖分正问题,及反问题的算法.并且附有网络剖分数据表!

function OutSpMat = SparseCrush(SpMat)

%SparseCrush  Minimise memory requirement of sparse matrix
% Function OutSpMat = SparseCrush(SpMat);
% Minimises memory requirement of a sparse matrix.
%
% INPUT 
% SpMat = sparse matrix with unefficient use of memory
%
% OUTPUT
%
% OutSpMat = same as SpMat but uses less memory (in certain cases)    


[ i, j, s ] = find( SpMat ) ;
[ m, n ] = size( SpMat ) ;
OutSpMat = sparse( i , j , s , m , n ) ;