删除字符 / 包括它之后的所有单词答案

【问题标题】：remove all words after character / including it删除字符 / 包括它之后的所有单词
【发布时间】：2019-06-03 18:39:20
【问题描述】：

我有这个我用名称行调用的元素列表

 row <-

    [[798]]
    [1] "SINE/tRNA-Deu"

    [[799]]
    [1] "Simple/repeat"

    [[800]]
    [1] "SINE/tRNA-Deu"


    [[802]]
    [1] "SINE/tRNA-gip"

    [[803]]
    [1] "Simple/repeat"

    [[804]]
    [1] "SINE/MIR"

    [[805]]
    [1] "SINE/tRNA-Deu"

    [[806]]
    [1] "Simple/repeat"

    [[807]]
    [1] "SINE/tRNA-Deu"

    [[808]]
    [1] "SINE/tRNA-Deu"

    [[809]]
    [1] "SINE/tRNA-Deu"

    [[813]]
    [1] "Low_complexity/alfa"

有没有办法消除所有元素中/之后的所有单词？我试过这个：

row1 <- gsub("(/).*", "\\1", row)

但在输出中字符“/”没有被删除。我不想在元素名称中包含它（例如 SINE、Simple 等）：

[1] "SINE/" "Simple/" "SINE/" "SINE/" "Simple/"

[6] "SINE/" "SINE/" "Simple/" "SINE/" "SINE/"

[11] "SINE/" "Low_complexity/"

我的代码中的错误在哪里？

【问题讨论】：

标签： r

【解决方案1】：

一个简单的修复，不要使用捕获组：

row1 <- gsub("/.*", "", row)

【讨论】：