我试图在R中编写一个函数,从我那里读出两个单词,然后打印出包含这两个单词的所有字符串。
我有一个名为x的data.frame,第一列是我需要搜索字符串的地方。
我写道:
findcontain <- function{
Clue1 <- readline(prompt= "Enter the first Clue.")
Clue2 <- readline(prompt= "Enter the second Clue.")
Clues <- paste(Clue1, "&", Clue2, sep="")
grep(Clues, x[1,])}
这不起作用......我错过了什么?请帮忙。
答案 0 :(得分:0)
根据您的确切需要,您可能需要稍微调整一下,但这可能会对您有所帮助:
findcontain <- function(x){
Clue1 <- readline(prompt= "Enter the first Clue.")
Clue2 <- readline(prompt= "Enter the second Clue.")
intersect(grep(Clue1, x$col1) , grep(Clue2, x$col1)) }
x<-data.frame(col1=c("this is an example","another example","bla","blabla","tree",
"house","house and tree"))
findcontain(x)