我有这个数据集，我需要删除(删除和垃圾)城市名称后的所有内容.我该怎么办？
dati1<- c("a - Novara Delete", "b - Torino Trash", "c - Milano", "f - Bari")
dati2 <-data.frame(do.call(rbind, strsplit(dati1, split = " - ")))
我试过:
c <- dati2$X2 %>% mutate(dati2$X2 = sub("\\s+[^ ]+$", "", dati2$X2))
你可以使用separate:
tidyr::separate(data.frame(dati1), col = dati1, into = stringr::str_c("col", 1:2), extra = 'drop')
col1 col2
1 a Novara
2 b Torino
3 c Milano
4 f Bari
还是用R基
data.frame(do.call(rbind, lapply(strsplit(dati1, split = "[^[:alnum:]]+"), head, 2)))