Ksyer/FAR_CS
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Update PT code in Block RIP

Browse Source
This commit is contained in:
Ksyer
2024-07-16 15:50:04 +08:00
parent ce60606d82
commit 088f1a82fd
7 changed files with 66 additions and 81 deletions
Download Patch File Download Diff File Expand all files Collapse all files
Block RIP/Phase transitions/block_phase_transition.m
+29 -12
View File
@@ -1,39 +1,56 @@
function pt = block_phase_transition(N, M)
function [N_b, N_s] = block_phase_transition(N, M)
tau_min = 0;
tau_max = 10;
tau_interval = 0.05;
tau_range = tau_min:tau_interval:tau_max;
K_min = 1;
K_max = 25;
K_max = 15;
K_range = K_min:K_max;
pt = zeros(25, 1);
N_b = zeros(length(K_range), 1);
N_s = zeros(length(K_range), 1);
cache_filename = "I.mat";
cache_filename_1 = "I_2.mat";
cache_filename_2 = "I_" + string(2 * M) + ".mat";
if exist(cache_filename, "file")
load(cache_filename);
if exist(cache_filename_1, "file")
load(cache_filename_1, "I_2");
else
I = zeros(length(tau_range), 0);
I_2 = zeros(length(tau_range), 0);
for tau_idx = 1:length(tau_range)
tau = tau_range(tau_idx);
I(tau_idx) = calc_block_integral(tau, 4);
I_2(tau_idx) = calc_block_integral(tau, 2);
end
save I.mat
save(cache_filename_1, "I_2");
end
if exist(cache_filename_2, "file")
load(cache_filename_2, "I_2M");
else
I_2M = zeros(length(tau_range), 0);
parfor tau_idx = 1:length(tau_range)
tau = tau_range(tau_idx);
I_2M(tau_idx) = calc_block_integral(tau, 2 * M);
end
save(cache_filename_2, "I_2M");
end
for K_idx = 1:length(K_range)
K = K_range(K_idx);
f_set = zeros(length(tau_range), 1);
f_set_1 = zeros(length(tau_range), 1);
f_set_2 = zeros(length(tau_range), 1);
for tau_idx = 1:length(tau_range)
tau = tau_range(tau_idx);
f_set(tau_idx) = 1/2 * (K * (2 * M + tau ^ 2) + (N - K) * I(tau_idx));
f_set_1(tau_idx) = 1/2 * (K * (2 * M + tau ^ 2) + (N - K) * I_2M(tau_idx));
f_set_2(tau_idx) = M/2 * (K * (2 + tau ^ 2) + (N - K) * I_2(tau_idx));
end
pt(K_idx) = min(f_set);
N_b(K_idx) = min(f_set_1);
N_s(K_idx) = min(f_set_2);
end
end