在Rcpp函数中使用无缝R

Question

我以为我之前已经看过你可以编写一个Rcpp函数并在其中使用R代码。我只是找不到链接，使用谷歌根本没有帮助。您能否提供一个示例或链接，说明如何操作？

Answer 1

关键是底部的/*** R ... */表达式，请参阅＆＃39; Rcpp属性＆＃39;晕影。

所以代码

#include <Rcpp.h>

// [[Rcpp::export]]
void reallyWorks() {
  Rcpp::Rcout << "Oh, wow, it works" << std::endl;
}

/*** R
reallyWorks()
*/

我们直接从sourceCpp()得到预期的行为：

> sourceCpp("/tmp/soQ.cpp")

> reallyWorks()
Oh, wow, it works
>