now nut running after trying to set default arguments

Author: jonathan-taylor

C-software

@@ -65,6 +65,7 @@ randomizedLasso = function(X,
     ever_active = rep(0, p)
     nactive = as.integer(0)
 
+    print('here')
     result = solve_QP_wide(X,                  # design matrix
     	                   lam / n,            # vector of Lagrange multipliers
 		           ridge_term / n,     # ridge_term 
@@ -85,6 +86,7 @@ randomizedLasso = function(X,
 
     sign_soln = sign(result$soln)
 
+    print('now')
     unpenalized = lam == 0
     active = (!unpenalized) & (sign_soln != 0)
     inactive = (!unpenalized) & (sign_soln == 0)

selectiveInference/R/funs.randomized.R

@@ -36,7 +36,7 @@ collect_results = function(n,p,s, nsim=100, level=0.9){
     X=data$X
     y=data$y
     beta=data$beta
-    result = selectiveInference:::randomizedLassoInf(X, y, sigma, lam, level=level)
+    result = selectiveInference:::randomizedLassoInf(X, y, lam, level=level)
     true_beta = beta[result$active_set]
     coverage = rep(0, nrow(result$ci))
     for (i in 1:nrow(result$ci)){