Files
FAR_CS/Block RIP/Phase transitions/block_phase_transition_formula.m
T
2024-07-16 15:50:04 +08:00

22 lines
558 B
Matlab

function pt = block_phase_transition_formula(N, M)
K_min = 1;
K_max = 25;
K_range = K_min:K_max;
pt = zeros(25, 1);
d = N;
m = M;
for K_idx = 1:length(K_range)
s = K_range(K_idx);
pt(K_idx) = theoretic(m, s, d);
end
end
function n = theoretic(m,s,d)
syms t;
syms u;
f = s*(m+t^2)+(d-s)*int((u-t)^2*u^(m-1)*exp(-u^2/2)/(2^(m/2-1)*gamma(m/2)),u,t,inf);
g = diff(f,t);
t1 = solve(g);
n = s*(m+t1^2)+(d-s)*int((u-t1)^2*u^(m-1)*exp(-u^2/2)/(2^(m/2-1)*gamma(m/2)),u,t1,inf);
end