Update FAR vs PD

FAR vs PD/recovery.m

@@ -25,6 +25,14 @@ function x_hat = recovery(A, y_noise)
         x_d_CROD = x_LASSO + A'*(y_noise - A*x_LASSO)/Q_hat;
         x_hat = x_d_CROD;
 
+        RSS = 1/sz(2) * norm(y_noise - A * x_LASSO, 2)^2;
+        noise_sigma_2 = 1e-4;
+        P_fa = normcdf(1, 0, 1);
+        sigma_w_2 = (gamma * (1-gamma)) / ((gamma - Rho)^2) * RSS + noise_sigma_2;
+        k_d = -sigma_w_2 * log(P_fa);
+
+        fprintf("%f %f %f\n", gamma, sigma_w_2, k_d);
+
     elseif method == "LASSO"
         sz = size(A);
         N = sz(2);
@@ -47,7 +55,7 @@ function x_hat = recovery(A, y_noise)
         cvx_end
     else
         global lambda tau iter_max;
-        [x_hat, z_hat_d] = cVAMPro(y_noise, A, lambda, tau, iter_max);
+        [x_hat, x_hat_d] = cVAMPro(y_noise, A, lambda, tau, iter_max);
     end
 end