Rcpp：如何删除sourceCpp生成的临时文件？

问题描述

我有一些看起来像这样的数据集

mdf <- data.table(matrix(rexp(100 * 100,rate = 0.1),ncol = 100))
mwt <- data.table(V1 = rexp(100,rate = 10))
start <- 2

我运行了一个相当简单的代码，如下

library(RcppArmadillo)
library(Rcpp)

rcpp_code <- "// [[Rcpp::depends(RcppArmadillo)]]
#include <RcppArmadillo.h>
// [[Rcpp::export]]
arma::mat rcpp_ApplyTimeShifting(arma::mat data,arma::mat weights,int start) {
  const int len = weights.size();
 
  for (int i = start; i < len; i++) {
    data.row(i) = data.row(i - 1) * (1 - weights.row(i)(0)) + data.row(i) * weights.row(i)(0);
  }
  return data;
}
"

Rcpp::sourceCpp(code = rcpp_code)

temp <-rcpp_ApplyTimeShifting( as.matrix(mdf),as.matrix(mwt),start)

每次我运行它时，都会生成一个编译器文件 C:\Users*用户名*\AppData\Local\Temp

我该怎么做：

• 要么在Rcpp函数使用结束后自动删除编译器文件OR
• 让 Rcpp 函数始终使用相同的编译器（这样它就不会在我每次运行时构建新的编译器文件）

谢谢

解决方法

暂无找到可以解决该程序问题的有效方法，小编努力寻找整理中！

如果你已经找到好的解决方法，欢迎将解决方案带上本链接一起发送给小编。

小编邮箱:dio#foxmail.com (将#修改为@）