Удалите несколько косых черт в конце строки и оставьте одну только в R

Question

В моем случае это веб-строки, но здесь я приведу более простой пример: `

df = data.frame(Strings = c("abc/d/e/f////", "abc///", "/", "a/bc/d/////"))

Результат, который я хочу получить, состоит в том, чтобы сделать строку, заканчивающуюся несколькими символами "/", в конце строки остался только один "/".

Это означает, что для df, который я дал выше, я хочу получить такой результат:

df_result = data.frame(Strings = c("abc/d/e/f/", "abc/", "/", "a/bc/d/"))

Спасибо, что ответили на мой вопрос.

Answer 1

Мы могли бы использовать:

string1<-"abc/d/e/f///"
gsub("/(?=/{1,})","",string1,perl=TRUE)
#[1] "abc/d/e/f/"