【请教】正则表达式问题：怎么提取不包含某个特征的文件名？

fan

<br />
dir.create("D:/test")<br />
write.csv(iris, "D:/test/%_test_2010.csv")<br />
write.csv(iris, "D:/test/test_%_2011.csv")<br />
write.table(iris, "D:/test/test_2012.txt")</p>
<p>list.files("D:/test", pattern = "^%")    # 提取以“%”开头的文件名<br />
list.files("D:/test", pattern = "%")    # 提取包含“%”的文件名<br />
# 怎么提取不包含“%”的文件名呢？<br />
# 类似地，怎么提取不包含2010的文件名呢？</p>
<p>unlink("D:/test", recursive = TRUE)<br />

谢谢！

皮皮米菲兔

酱紫？

<br />
list.files("D:/test", pattern = "^[^%]+$")<br />

fan

回复第2楼的波波头一头：好象是，但是为什么有下面的结果：

<br />
> list.files("D:/test", pattern = "[^%]")<br />
[1] "%_test_2010.csv" "test_%_2011.csv" "test_2012.txt"<br />

为什么加上开始符^和结束符$就行了呢？

另外，怎么提取不包含2010的文件名呢？

皮皮米菲兔

回复第3楼的 fan：你这样的话貌似只要匹配到不是%的字符就认为是满足条件的。所以要指定从开头到结尾都不是%吧。

不包含2010，好像跟 http://cos.name/cn/topic/103317 一样啊。

fan

回复第4楼的波波头一头：貌似 http://cos.name/cn/topic/103317 不能真正解决我这里的问题……

fan

回复第4楼的波波头一头：\\b((?!2010)\\w)+\\b好像可以，但是

<br />
> list.files("D:/test", pattern = "\\b((?!2010)\\w)+\\b")<br />
Error in list.files("D:/test", pattern = "\\b((?!2010)\\w)+\\b") :<br />
  invalid 'pattern' regular expression<br />

fan

回复第6楼的 fan：想来想去，只好曲线救国：

<br />
> setdiff(list.files("D:/test"), list.files("D:/test", pattern = "2010"))<br />
[1] "test_%_2011.csv" "test_2012.txt"<br />