[row, col] = find( R ~= 0 ); % row，col是所有非零元素的横坐标和纵坐标num = size(row, 1); % 有多少个非零元素for i = 1:num R(row(i), col(i)) = 1; % 非零元素置一end
