diff --git a/R/impsamp.R b/R/impsamp.R
index e0591a2..4c1c1e1 100644
--- a/R/impsamp.R
+++ b/R/impsamp.R
@@ -36,9 +36,9 @@ pop_pred_samp <- function(object,
         if (is.complex(ev)) {
             print(x)
             print(ev)
-            stop("covariance matrix with complex eigenvalues (!)")
+            warning("covariance matrix with complex eigenvalues (!)")
         }
-        min(ev)
+        min(Re(ev))
     }
 
     ## extract var-cov,