R:用户定义函数查找包含两个字符串的字符串

时间:2017-03-09 20:41:00

标签: r

我试图在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,])}

这不起作用......我错过了什么?请帮忙。

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)