# Example data frame
my_data <- dummy_data(100)
my_data[["blanks"]] <- " This is a test "
# Remove blanks
my_data[["leading"]] <- my_data |> remove_blanks(blanks, which = "leading")
my_data[["trailing"]] <- my_data |> remove_blanks(blanks, which = "trailing")
my_data[["trim"]] <- my_data |> remove_blanks(blanks, which = "trim")
my_data[["all"]] <- my_data |> remove_blanks(blanks, which = "all")
my_data[["normalize"]] <- my_data |> remove_blanks(blanks, which = "normalize")
Run the code above in your browser using DataLab