Use index subset

Signed-off-by: Liang Zhang <[email protected]>
psychelzh · Mar 29, 2024 · 2fdcb03 · 2fdcb03
1 parent 1a8568e
commit 2fdcb03
Showing 1 changed file with 1 addition and 2 deletions.
diff --git a/R/preproc.R b/R/preproc.R
@@ -15,8 +15,7 @@ wrangle_data <- function(data,
     data[[col_raw_json]],
     parse_raw_json
   )
-  data[[col_raw_json]] <- NULL
-  data
+  data[, names(data) != col_raw_json, drop = FALSE]
 }
 
 #' Feed Raw Data to Pre-processing