Strip dimension of distort_dist_concs so that it appears as a vector

cleanzr · Jun 21, 2022 · 1b9a4dc · 1b9a4dc
1 parent a573f26
commit 1b9a4dc
Showing 1 changed file with 3 additions and 1 deletion.
diff --git a/src/distort_dist_concs.cpp b/src/distort_dist_concs.cpp
@@ -24,7 +24,9 @@ double DistortDistConcs::get(attr_id aid) const {
 }
 
 Rcpp::NumericVector DistortDistConcs::to_R() const {
-  return Rcpp::wrap(values_);
+  Rcpp::NumericVector values_vec = Rcpp::wrap(values_);
+  values_vec.attr("dim") = R_NilValue ;
+  return(values_vec);
 }
 
 void DistortDistConcs::update(