extract.m

来自「希望这个算法对大家有用」· M 代码 · 共 10 行

% Function Extracts lines from M indexed by I
function [M] = extract(M,I);    % 筛选功能
%！！！！！！！！！！！！
% 从矩阵M中删除第I行
%！！！！！！！！！！！！
Maux = zeros(size(M));
Maux(I,:) = M(I,:);
M = M - Maux;
[I] = find(M(:,1)~=0);
M = M(I,:);