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

对于rmarkdown文件，有一个选项允许选择编译后是否删除.tex文件。因此，只剩下.rmd和.pdf文件

---

对于.rnw文件，是否也有办法实现这一点

除了自己实现一个更干净的函数，我还没有找到其他解决方案。选中此项：

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 = '|')))
  }
}

清理文件夹