如何用|分割脚本到r中的下一行

时间:2019-02-06 19:08:15

标签: r

我想基于列中某些字符串的列表替换列值。但是列表太长了,我想切换到下一行。 但是,R不会接受。

####The test data file is data1
a <- runif (10)
b <- c("a;c", "a", "b", "c","a;b;c","a;d", "a;c", "a;b;c;d;e","e", "f")
c <- c(rep ("A-B", 4), rep("A_C", 6))
data1 <- data.frame (a, b, c)
data1 
####            a         b   c
####1  0.63360850       a;c A-B
####2  0.04681311         a A-B
####3  0.04743504         b A-B
####4  0.95342317         c A-B
####5  0.09054516     a;b;c A_C
####6  0.93139978       a;d A_C
####7  0.20558417       a;c A_C
####8  0.64131076 a;b;c;d;e A_C
####9  0.88136996         e A_C
####10 0.22000617         f A_C
list=c("a|b|c")
data1$b <- gsub(list, "[other]", data1$b)
####The ultimate goal example for the 1st line
####1  0.63360850       [other];[other] A-B
####But the list is actually too long, I have to move them into the next 
####line:
####E.g.:
list=c("a|
        b|
        c")

如何解决我的列表中的更改行问题?我不仅有3个字符串,而且每个字符串都非常长。 有人可以请教吗?提前非常感谢您!

1 个答案:

答案 0 :(得分:0)

您可以使用paste

my.list = paste(
  "a",
  "b",
  "c",
  sep ='|')
data1$b <- gsub(my.list, "[other]", data1$b)

或者另一个选择是在将列表定义为单个字符串后删除换行符:

my.list = 
"
a|
b|
c
"
my.list = gsub("\\n", "", my.list)