Revisión | 9e054c5bf4de51bd0b46fe25c3fe3c353f9621d7 (tree) |
---|---|
Tiempo | 2023-01-25 18:34:46 |
Autor | Lorenzo Isella <lorenzo.isella@gmai...> |
Commiter | Lorenzo Isella |
I merged two different heads.
@@ -5138,15 +5138,22 @@ | ||
5138 | 5138 | |
5139 | 5139 | |
5140 | 5140 | |
5141 | -clean_data <- function(x){ | |
5141 | +clean_data <- function(x, remove_duplicated_rows=T){ | |
5142 | 5142 | |
5143 | 5143 | res <- x |> ## %>% |
5144 | 5144 | clean_names() |> ## %>% |
5145 | 5145 | remove_empty() |> ## %>% |
5146 | - distinct() |> ## %>% | |
5146 | + | |
5147 | 5147 | rem_dupl_cols() |> ## %>% |
5148 | 5148 | rem_const_cols() |
5149 | 5149 | |
5150 | + if (remove_duplicated_rows==T){ | |
5151 | + | |
5152 | + res <- res |> | |
5153 | + distinct() | |
5154 | + | |
5155 | + } | |
5156 | + | |
5150 | 5157 | return(res) |
5151 | 5158 | |
5152 | 5159 |