使用Knitr编译.rnw文件后自动删除.tex文件

除了自己实现更清洁的功能外，我没有找到其他解决方案。检查一下：

cleanFolder <- function() {
  answer <- NA
  while(!(answer %in% c('y', 'n'))) {
    answer <- readline(paste("Clean ", getwd(),"? (y/n)"))
  }
  if(answer == 'y') {
    rules <- c('.log', '.vrb', '.nav', '.snm', '.toc', 
               '-tikzDictionary', '.tex', '.synctex.gz')
    file.remove(list.files(pattern = paste0('\\',rules ,'$', collapse = '|')))
  }
}

它应该是不言自明的：

1. 要求用户确认当前工作目录是要清除的目录。

2. rules包含所有应注意的文件扩展名（或类似的结尾-tikzDictionary）。

3. 最后file.remove，list.files使用正则表达式删除所有选择的文件。

您可以将此函数添加到自定义程序包中，该程序包将在您启动新的R会话时加载，并仅在编译* .Rnw文档后调用它。