Update Block RIP
This commit is contained in:
@@ -0,0 +1,16 @@
|
||||
function [RICs, RIC] = get_ric(A, K)
|
||||
sample_times = 500;
|
||||
[m, n] = size(A);
|
||||
RICs = zeros(2 * sample_times, 1);
|
||||
|
||||
for i = 1: sample_times
|
||||
indices = randperm(n, K);
|
||||
A_Lambda = A(:, indices(:));
|
||||
B = conj(A_Lambda') * A_Lambda;
|
||||
eig_B = real(eig(B));
|
||||
RICs(2 * i - 1) = min(eig_B) - 1;
|
||||
RICs(2 * i) = max(eig_B) - 1;
|
||||
end
|
||||
|
||||
RIC = max(RICs);
|
||||
end
|
||||
Reference in New Issue
Block a user