我有一个存储在A.path
中的txt文件列表,我想使用grep
来查找与该文件关联的年份,并将今年保存到矢量中。但是,由于其中一些txt文件在其文本中有多年,我只想存储第一个年份。我怎么能这样做?
我使用lapply
完成了类似的事情,这就是我开始解决这个问题的方法:
lapply(A.path, function(i){
j <- paste0(scan(i, what = character(), comment.char='', quote=NULL), collapse = " ")
year <- vector()
year[i] <- grep('[0-9][0-9][0-9][0-9]', j)
})
grep
可能不是正确使用的功能,因为这会为每个j
返回i
的全部内容。在这里使用的功能是什么?
答案 0 :(得分:5)
将评论转换为答案,您可以<style name="CommonBaseTheme.Base.Light" parent="Theme.AppCompat.NoActionBar">
....
</style>
使用gsub
来提取第一个匹配的值(即正则表达式中\\1
之间匹配的文字)
()