Fixed harcoded "#" separator

aldomann · aldomann · commit 4fc59d6c2cf9 · 2019-09-17T18:32:58.000+01:00
diff --git a/R/multilabel_binarizer.R b/R/multilabel_binarizer.R
@@ -49,7 +49,7 @@ multi_label_binarizer <- function(data, feature, sep = "#") {
   )
 
   detection_labels <- labels_raw %>%
-    stringr::str_replace_all("^|$", "#")
+    stringr::str_replace_all("^|$", sep)
 
   # Raw processed feature
   processed_feature <- pad_data_with_sep(data, {{ feature }}, sep) %>%

Original file line number	Diff line number	Diff line change
`@@ -49,7 +49,7 @@ multi_label_binarizer <- function(data, feature, sep = "#") {`
`49`	`49`	`)`
`50`	`50`
`51`	`51`	`detection_labels <- labels_raw %>%`
`52`		`- stringr::str_replace_all("^\|$", "#")`
	`52`	`+ stringr::str_replace_all("^\|$", sep)`
`53`	`53`
`54`	`54`	`# Raw processed feature`
`55`	`55`	`processed_feature <- pad_data_with_sep(data, {{ feature }}, sep) %>%`