首先,我知道这可能是一个Rcpp-Devel函数,但是当我尝试使用Firefox或Chrome进行订阅时,我在工作以太网上收到一个错误消息,指出该连接不安全,所以我现在必须在这里询问。

因此,我购买了Dirk的书,而且书写得很好。

我在这里遇到类似的错误
https://www.mail-archive.com/rcpp-devel%40lists.r-forge.r-project.org/msg08059.html

Sage<-testArm(set,labels,contrast,geneSets,var.equal=FALSE)
Calculating comparisons...Error in .Call("sigmaCalc", PACKAGE = "mySage") :
 "sigmaCalc" not available for .Call() for package "mySage"

请注意,我的NameSpace具有useDynLib(mySage),并且我可以成功运行compileAttributes和R CMD构建(在外部目录中)并成功安装该软件包。

当我尝试调用RcppExport.R函数之一时,生成错误

这是我的Cpp代码之一
//[[Rcpp::depends(RcppArmadillo)]]
#include <RcppArmadillo.h>
#include <algorithm>
#include <vector>
 #include <Rcpp.h>
 #include <math.h>
#include <R.h>
using namespace arma;
using namespace Rcpp;
//'calculates the sd and mindof in order , names are assigned in R, as of     now, there is no NA error checking.  not very robust
//' @param SDs standard deviations from geneResults returned by     makeComparison
//' @param DOFs degrees of freedom from geneResults returned by makeComparison
//' @param geneSets a set of genes for enrichment testing
//' @export
//' @return a List with SumSigma and MinDof
//[[Rcpp::export]]
List sigmaCalc( SEXP SDs, SEXP DOFs, SEXP geneSets) {
Rcpp::NumericVector SD(SDs);
Rcpp::NumericVector DOF(DOFs);
Rcpp::List geneSet(geneSets);
 more code ....

创建此处的注释并将其正确导出到R namespace 中
这是RcppExports.R
# This file was generated by Rcpp::compileAttributes
# Generator token: 10BE3573-1514-4C36-9D1C-5A225CD40393

#'calculates the sd and mindof in order , names are assigned in R, as of now, there is no NA error checking.  not very robust
#' @param SDs standard deviations from geneResults returned by makeComparison
#' @param DOFs degrees of freedom from geneResults returned by makeComparison
#' @param geneSets a set of genes for enrichment testing
#' @export
#' @return a List with SumSigma and MinDof
 sigmaCalc <- function(SDs, DOFs, geneSets) {
.Call('mySage_sigmaCalc', PACKAGE = 'mySage', SDs, DOFs, geneSets)
}

这是RcppExport.cpp
// This file was generated by Rcpp::compileAttributes
// Generator token: 10BE3573-1514-4C36-9D1C-5A225CD40393

#include <RcppArmadillo.h>
#include <Rcpp.h>

using namespace Rcpp;

// sigmaCalc
List sigmaCalc(SEXP SDs, SEXP DOFs, SEXP geneSets);
RcppExport SEXP mySage_sigmaCalc(SEXP SDsSEXP, SEXP DOFsSEXP, SEXP geneSetsSEXP) {
BEGIN_RCPP
Rcpp::RObject __result;
Rcpp::RNGScope __rngScope;
Rcpp::traits::input_parameter< SEXP >::type SDs(SDsSEXP);
Rcpp::traits::input_parameter< SEXP >::type DOFs(DOFsSEXP);
Rcpp::traits::input_parameter< SEXP >::type geneSets(geneSetsSEXP);
__result = Rcpp::wrap(sigmaCalc(SDs, DOFs, geneSets));
return __result;
 END_RCPP
 }

我不确定几件事,是否需要头文件?文本表明需要rcpp_hello_world.h,但是在阅读RcppExport.cpp之后,cpp函数声明包含在Export.cpp中,因此我不确定是否需要编写声明性头文件。还有networkBMA,wordcloud和pcaMethods都是Rcpp软件包,它们不包含 header ,那么仅接口(interface)API所需的 header 吗?

可能导致此错误的另一件事是我的函数参数是SEXP对象,而不是Rcpp:NumericVectors ... / NumericMatrix,我应该将cpp代码sigmaCalc编写为输入Rcpp类型,然后确保Export.cpp函数处理SEXP铸造?

谢谢。

附言这是我在src /下的Makevars
## Use the R_HOME indirection to support installations of multiple R version
PKG_LIBS = `$(R_HOME)/bin/Rscript -e "Rcpp:::LdFlags()"` $(LAPACK_LIBS) $(BLAS_LIBS) $(FLIBS)
PKG_CXXFLAGS=`$(R_HOME)/bin/Rscript -e "Rcpp:::CxxFlags()"`

我认为错误是我将SEXP输入为cpp功能集的输入,仅当原型(prototype)将sourceCpp从C++转换为R时才需要此操作,而打包时RcppExports.cpp是两个系统之间的中介。

最佳答案

这篇文章很长,要看它的结构很棘手。我建议您重新开始并执行以下任一操作

  • 调用Rcpp.package.skeleton()并研究该软件包或
  • 使用RStudio为您创建一个包,或者
  • 使用示例包,例如RcppExamples

  • 从这些开始,重建它们。然后慢慢添加您的函数,运行compileAttributes()并重新构建/重新安装。

    关于c++ - RCPP编译的属性不可用于调用,我们在Stack Overflow上找到一个类似的问题:https://stackoverflow.com/questions/36437669/

    10-10 05:07