我有以下文件 cumsum_bounded.cpp
#include <Rcpp.h>
using namespace Rcpp;
//' Cumulative sum.
//' @param x numeric vector
//' @param low lower bound
//' @param high upper bound
//' @param res bounded numeric vector
//' @export
//' @return bounded numeric vector
// [[Rcpp::export]]
NumericVector cumsum_bounded(NumericVector x, double low, double high) {
NumericVector res(x.size());
double acc = 0;
for (int i=0; i < x.size(); ++i) {
acc += x[i];
if (acc < low) acc = low;
else if (acc > high) acc = high;
res[i] = acc;
}
return res;
}
然后我构建并重新加载并测试我的新功能。
cumsum_bounded(c(1, -2, 3), low = 2, high = 10)
[1] 1 0 3
然后我构建文档。devtools::document()
When I Build & Reload
一切编译都很好。
但当我跑步时cumsum_bounded(c(1, 2, 3), low= 2, high = 10)
我收到错误:
Error in .Call("joshr_cumsum_bounded", PACKAGE = "joshr", x, low, high) :
"joshr_cumsum_bounded" not available for .Call() for package "joshr"
命名空间
# Generated by roxygen2: do not edit by hand
export(cumsum_bounded)
Update:
如果我如上所述创建一个新项目并且不使用Build & Reload
函数而不是 devtools::loadall() ,它会起作用。但一旦我按下那个按钮Build & Reload
按钮,它会向侧面移动。