如何使用|将脚本拆分到r中的下一行
我想根据列中某些字符串的列表替换列值。但是列表太长了,我想换到下一行。 然而,R不会接受它如何使用|将脚本拆分到r中的下一行,r,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) data
####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")
测试数据文件是data1
a您可以使用
粘贴
my.list = paste(
"a",
"b",
"c",
sep ='|')
data1$b <- gsub(my.list, "[other]", data1$b)
您可以使用粘贴
my.list = paste(
"a",
"b",
"c",
sep ='|')
data1$b <- gsub(my.list, "[other]", data1$b)
lstlst它工作得很好~非常感谢您的提示!非常好用~非常感谢您的提示!