C++ 在R包中查找Rcpp函数

我想打印R包

frailtysurv

中

bh

函数的C代码。 所以我打了：

> frailtySurv:::bh
function (d_, R_star, K_, Y_, N_, N_dot, beta, theta, frailty, 
    weights, abstol, reltol, maxit) 
{
    .Call("_frailtySurv_bh", PACKAGE = "frailtySurv", 
        d_, R_star, K_, Y_, N_, N_dot, beta, theta, frailty, 
        weights, abstol, reltol, maxit)
}
<bytecode: 0x0000025263262be0>
<environment: namespace:frailtySurv>

但是我在'frailtySurv'库中找不到src文件，也找不到另一个可以找到

\u frailtySurv\u bh

函数的文件。 包源中没有任何

.Rcpp

函数的跟踪。 我知道类似的问题已经被问了好几次（例如：，或其他），以打印

.Call

调用的函数。 这些对我的情况没有帮助

关于在哪里可以找到

\u frailtySurv\u bh

功能的任何提示

---

谢谢：-）

函数在

RcppExports.cpp

文件中定义，定义如下：

RcppExport SEXP\u frailtySurv\u bh（SEXP d_SEXP，SEXP R_starSEXP，SEXP K_SEXP，SEXP Y_SEXP，SEXP N_SEXP，SEXP N_dotsep，SEXP betaSEXP，SEXP thetaSEXP，SEXP frailtySEXP，SEXP weightsexp，SEXP absolsexp，SEXP reltolsep，SEXP maxitSEXP）{
开始
Rcpp：：RObject Rcpp\u结果\u gen；
Rcpp：：RNGScope Rcpp\u RNGScope\u gen；
Rcpp:：traits:：input_参数：：类型d_（d_SEXP）；
Rcpp:：traits:：input_参数：：输入R_星型（R_星型）；
Rcpp:：traits:：input_参数：：输入K_（K_SEXP）；
Rcpp:：traits:：input_参数：：类型Y（Y_SEXP）；
Rcpp:：traits:：input_参数：：输入N_（N_SEXP）；
Rcpp:：traits:：input_参数：：输入N_点（N_点sexp）；
Rcpp:：traits:：input_参数：：类型beta（betaSEXP）；
Rcpp:：traits:：input_参数：：输入θ（θ）；
Rcpp:：traits:：input_参数：：类型脆弱性（frailtySEXP）；
Rcpp:：traits:：input_参数：：类型权重（weightsexp）；
Rcpp:：traits:：input_参数：：类型Absol（Absolsexp）；
Rcpp:：traits:：input_参数：：类型reltol（reltolsepp）；
Rcpp:：traits:：input_参数：：键入maxit（maxitSEXP）；
rcpp_result_gen=rcpp:：wrap（bh（d_，R_星，K_星，Y_星，N_星，N_星，N_星，N_星，N_星，N点，β，θ，脆弱，重量，Absol，reltol，maxit））；
返回rcpp\u结果\u gen；
结束(RCPP)
}

---

<>你会看到它实际上是C++函数的一个非常薄的包装器，叫做“代码> BH< /COD>，这里有太长的时间无法复制，但是被定义了。

< P> <代码> ffyTySurvv.BH> /Cuff>函数被定义在<代码> RCPppExest.CPP < /Cuff>文件中，它被定义，并且看起来像：

RcppExport SEXP\u frailtySurv\u bh（SEXP d_SEXP，SEXP R_starSEXP，SEXP K_SEXP，SEXP Y_SEXP，SEXP N_SEXP，SEXP N_dotsep，SEXP betaSEXP，SEXP thetaSEXP，SEXP frailtySEXP，SEXP weightsexp，SEXP absolsexp，SEXP reltolsep，SEXP maxitSEXP）{
开始
Rcpp：：RObject Rcpp\u结果\u gen；
Rcpp：：RNGScope Rcpp\u RNGScope\u gen；
Rcpp:：traits:：input_参数：：类型d_（d_SEXP）；
Rcpp:：traits:：input_参数：：输入R_星型（R_星型）；
Rcpp:：traits:：input_参数：：输入K_（K_SEXP）；
Rcpp:：traits:：input_参数：：类型Y（Y_SEXP）；
Rcpp:：traits:：input_参数：：输入N_（N_SEXP）；
Rcpp:：traits:：input_参数：：输入N_点（N_点sexp）；
Rcpp:：traits:：input_参数：：类型beta（betaSEXP）；
Rcpp:：traits:：input_参数：：输入θ（θ）；
Rcpp:：traits:：input_参数：：类型脆弱性（frailtySEXP）；
Rcpp:：traits:：input_参数：：类型权重（weightsexp）；
Rcpp:：traits:：input_参数：：类型Absol（Absolsexp）；
Rcpp:：traits:：input_参数：：类型reltol（reltolsepp）；
Rcpp:：traits:：input_参数：：键入maxit（maxitSEXP）；
rcpp_result_gen=rcpp:：wrap（bh（d_，R_星，K_星，Y_星，N_星，N_星，N_星，N_星，N_星，N点，β，θ，脆弱，重量，Absol，reltol，maxit））；
返回rcpp\u结果\u gen；
结束(RCPP)
}

<>你会发现它实际上是一个非常薄的包装器，用于C++函数，叫做“代码> BH< /COD>。这里有太长的时间无法复制，但是被定义了。

# Generated by using Rcpp::compileAttributes() -> do not edit by hand