我试图用c而不使用Rcpp来构建一个R包(我知道Rcpp工作得非常好).我已经阅读了几个R包教程,并简要阅读了写R扩展.下面的示例1)正在工作,但示例2)崩溃R.我想知道为什么会发生这种情况(是否有任何先决条件为R等编写函数……?).
例1
在.cpp文件中
extern "C" {
SEXP add(SEXP a, SEXP b) {
SEXP result = PROTECT(allocVector(REALSXP, 1));
REAL(result)[0] = asReal(a) + asReal(b);
UNPROTECT(1);
return result;
}
}
打电话给R:
.Call("add", 3.0, 2.0).
这个例子有效.
例2
在.cpp文件中:
extern "C" {
void RHello() {
Rprintf("Hello.\n");
R_FlushConsole();
R_ProcessEvents();
}
}
打电话给R:
.Call("RHello").
这会导致R崩溃
最佳答案 在第二种情况下(void返回值)函数的签名是错误的,它需要返回一个SEXP对象.即使那只是R_NilValue.
我希望你有充分的理由不使用Rcpp.