相关疑难解决方法(0)

我正在使用gsubR中的函数在文本列表中返回我的模式(引用数字)的出现.除非找不到匹配项,否则这很有用,在这种情况下,我会返回整个字符串,而不是空字符串.考虑这个例子:

data <- list("a sentence with citation (Ref. 12)",
             "another sentence without reference")

sapply(data, function(x) gsub(".*(Ref. (\\d+)).*", "\\1", x))

返回:

[1] "Ref. 12"                            "another sentence without reference"

但是我想得到

[1] "Ref. 12"                            ""

谢谢!