-
Notifications
You must be signed in to change notification settings - Fork 17
Commit
This commit does not belong to any branch on this repository, and may belong to a fork outside of the repository.
Revert "Removed RcppExports.R + .cpp files"
This reverts commit b3b3019.
- Loading branch information
1 parent
464bf25
commit 725f031
Showing
2 changed files
with
172 additions
and
0 deletions.
There are no files selected for viewing
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
Original file line number | Diff line number | Diff line change |
---|---|---|
@@ -0,0 +1,15 @@ | ||
# Generated by using Rcpp::compileAttributes() -> do not edit by hand | ||
# Generator token: 10BE3573-1514-4C36-9D1C-5A225CD40393 | ||
|
||
HiddenBASiCS_MCMCcpp <- function(N, thin, burn, Counts, mu0, delta0, phi0, s0, nu0, theta0, s2mu, adelta, bdelta, p_Phi, as, bs, atheta, btheta, ar, LSmu0, LSdelta0, LSphi0, LSnu0, LStheta0, sumByCellAll, sumByCellBio, sumByGeneAll, sumByGeneBio, StoreAdapt, EndAdapt, PrintProgress, s2_delta, prior_delta) { | ||
.Call('_BASiCS_HiddenBASiCS_MCMCcpp', PACKAGE = 'BASiCS', N, thin, burn, Counts, mu0, delta0, phi0, s0, nu0, theta0, s2mu, adelta, bdelta, p_Phi, as, bs, atheta, btheta, ar, LSmu0, LSdelta0, LSphi0, LSnu0, LStheta0, sumByCellAll, sumByCellBio, sumByGeneAll, sumByGeneBio, StoreAdapt, EndAdapt, PrintProgress, s2_delta, prior_delta) | ||
} | ||
|
||
HiddenBASiCS_MCMCcppBatch <- function(N, thin, burn, Counts, BatchDesign, mu0, delta0, phi0, s0, nu0, theta0, s2mu, adelta, bdelta, p_Phi, as, bs, atheta, btheta, ar, LSmu0, LSdelta0, LSphi0, LSnu0, LStheta0, sumByCellAll, sumByCellBio, sumByGeneAll, sumByGeneBio, StoreAdapt, EndAdapt, PrintProgress, s2_delta, prior_delta) { | ||
.Call('_BASiCS_HiddenBASiCS_MCMCcppBatch', PACKAGE = 'BASiCS', N, thin, burn, Counts, BatchDesign, mu0, delta0, phi0, s0, nu0, theta0, s2mu, adelta, bdelta, p_Phi, as, bs, atheta, btheta, ar, LSmu0, LSdelta0, LSphi0, LSnu0, LStheta0, sumByCellAll, sumByCellBio, sumByGeneAll, sumByGeneBio, StoreAdapt, EndAdapt, PrintProgress, s2_delta, prior_delta) | ||
} | ||
|
||
HiddenBASiCS_MCMCcppNoSpikes <- function(N, thin, burn, Counts, BatchDesign, mu0, delta0, phi0, nu0, theta0, s2mu, adelta, bdelta, aphi, bphi, atheta, btheta, ar, LSmu0, LSdelta0, LSnu0, LStheta0, sumByCellAll, sumByGeneAll, StoreAdapt, EndAdapt, PrintProgress, s2_delta, prior_delta, BatchInfo, BatchIds, BatchSizes, BatchOffSet, Constrain, Index, RefGene, RefGenes, ConstrainGene, NotConstrainGene, ConstrainType) { | ||
.Call('_BASiCS_HiddenBASiCS_MCMCcppNoSpikes', PACKAGE = 'BASiCS', N, thin, burn, Counts, BatchDesign, mu0, delta0, phi0, nu0, theta0, s2mu, adelta, bdelta, aphi, bphi, atheta, btheta, ar, LSmu0, LSdelta0, LSnu0, LStheta0, sumByCellAll, sumByGeneAll, StoreAdapt, EndAdapt, PrintProgress, s2_delta, prior_delta, BatchInfo, BatchIds, BatchSizes, BatchOffSet, Constrain, Index, RefGene, RefGenes, ConstrainGene, NotConstrainGene, ConstrainType) | ||
} | ||
|
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
Original file line number | Diff line number | Diff line change |
---|---|---|
@@ -0,0 +1,157 @@ | ||
// Generated by using Rcpp::compileAttributes() -> do not edit by hand | ||
// Generator token: 10BE3573-1514-4C36-9D1C-5A225CD40393 | ||
|
||
#include <RcppArmadillo.h> | ||
#include <Rcpp.h> | ||
|
||
using namespace Rcpp; | ||
|
||
// HiddenBASiCS_MCMCcpp | ||
Rcpp::List HiddenBASiCS_MCMCcpp(int N, int thin, int burn, NumericMatrix Counts, NumericVector mu0, NumericVector delta0, NumericVector phi0, NumericVector s0, NumericVector nu0, double theta0, double s2mu, double adelta, double bdelta, NumericVector p_Phi, double as, double bs, double atheta, double btheta, double ar, NumericVector LSmu0, NumericVector LSdelta0, double LSphi0, NumericVector LSnu0, double LStheta0, NumericVector sumByCellAll, NumericVector sumByCellBio, NumericVector sumByGeneAll, NumericVector sumByGeneBio, int StoreAdapt, int EndAdapt, int PrintProgress, double s2_delta, double prior_delta); | ||
RcppExport SEXP _BASiCS_HiddenBASiCS_MCMCcpp(SEXP NSEXP, SEXP thinSEXP, SEXP burnSEXP, SEXP CountsSEXP, SEXP mu0SEXP, SEXP delta0SEXP, SEXP phi0SEXP, SEXP s0SEXP, SEXP nu0SEXP, SEXP theta0SEXP, SEXP s2muSEXP, SEXP adeltaSEXP, SEXP bdeltaSEXP, SEXP p_PhiSEXP, SEXP asSEXP, SEXP bsSEXP, SEXP athetaSEXP, SEXP bthetaSEXP, SEXP arSEXP, SEXP LSmu0SEXP, SEXP LSdelta0SEXP, SEXP LSphi0SEXP, SEXP LSnu0SEXP, SEXP LStheta0SEXP, SEXP sumByCellAllSEXP, SEXP sumByCellBioSEXP, SEXP sumByGeneAllSEXP, SEXP sumByGeneBioSEXP, SEXP StoreAdaptSEXP, SEXP EndAdaptSEXP, SEXP PrintProgressSEXP, SEXP s2_deltaSEXP, SEXP prior_deltaSEXP) { | ||
BEGIN_RCPP | ||
Rcpp::RObject rcpp_result_gen; | ||
Rcpp::RNGScope rcpp_rngScope_gen; | ||
Rcpp::traits::input_parameter< int >::type N(NSEXP); | ||
Rcpp::traits::input_parameter< int >::type thin(thinSEXP); | ||
Rcpp::traits::input_parameter< int >::type burn(burnSEXP); | ||
Rcpp::traits::input_parameter< NumericMatrix >::type Counts(CountsSEXP); | ||
Rcpp::traits::input_parameter< NumericVector >::type mu0(mu0SEXP); | ||
Rcpp::traits::input_parameter< NumericVector >::type delta0(delta0SEXP); | ||
Rcpp::traits::input_parameter< NumericVector >::type phi0(phi0SEXP); | ||
Rcpp::traits::input_parameter< NumericVector >::type s0(s0SEXP); | ||
Rcpp::traits::input_parameter< NumericVector >::type nu0(nu0SEXP); | ||
Rcpp::traits::input_parameter< double >::type theta0(theta0SEXP); | ||
Rcpp::traits::input_parameter< double >::type s2mu(s2muSEXP); | ||
Rcpp::traits::input_parameter< double >::type adelta(adeltaSEXP); | ||
Rcpp::traits::input_parameter< double >::type bdelta(bdeltaSEXP); | ||
Rcpp::traits::input_parameter< NumericVector >::type p_Phi(p_PhiSEXP); | ||
Rcpp::traits::input_parameter< double >::type as(asSEXP); | ||
Rcpp::traits::input_parameter< double >::type bs(bsSEXP); | ||
Rcpp::traits::input_parameter< double >::type atheta(athetaSEXP); | ||
Rcpp::traits::input_parameter< double >::type btheta(bthetaSEXP); | ||
Rcpp::traits::input_parameter< double >::type ar(arSEXP); | ||
Rcpp::traits::input_parameter< NumericVector >::type LSmu0(LSmu0SEXP); | ||
Rcpp::traits::input_parameter< NumericVector >::type LSdelta0(LSdelta0SEXP); | ||
Rcpp::traits::input_parameter< double >::type LSphi0(LSphi0SEXP); | ||
Rcpp::traits::input_parameter< NumericVector >::type LSnu0(LSnu0SEXP); | ||
Rcpp::traits::input_parameter< double >::type LStheta0(LStheta0SEXP); | ||
Rcpp::traits::input_parameter< NumericVector >::type sumByCellAll(sumByCellAllSEXP); | ||
Rcpp::traits::input_parameter< NumericVector >::type sumByCellBio(sumByCellBioSEXP); | ||
Rcpp::traits::input_parameter< NumericVector >::type sumByGeneAll(sumByGeneAllSEXP); | ||
Rcpp::traits::input_parameter< NumericVector >::type sumByGeneBio(sumByGeneBioSEXP); | ||
Rcpp::traits::input_parameter< int >::type StoreAdapt(StoreAdaptSEXP); | ||
Rcpp::traits::input_parameter< int >::type EndAdapt(EndAdaptSEXP); | ||
Rcpp::traits::input_parameter< int >::type PrintProgress(PrintProgressSEXP); | ||
Rcpp::traits::input_parameter< double >::type s2_delta(s2_deltaSEXP); | ||
Rcpp::traits::input_parameter< double >::type prior_delta(prior_deltaSEXP); | ||
rcpp_result_gen = Rcpp::wrap(HiddenBASiCS_MCMCcpp(N, thin, burn, Counts, mu0, delta0, phi0, s0, nu0, theta0, s2mu, adelta, bdelta, p_Phi, as, bs, atheta, btheta, ar, LSmu0, LSdelta0, LSphi0, LSnu0, LStheta0, sumByCellAll, sumByCellBio, sumByGeneAll, sumByGeneBio, StoreAdapt, EndAdapt, PrintProgress, s2_delta, prior_delta)); | ||
return rcpp_result_gen; | ||
END_RCPP | ||
} | ||
// HiddenBASiCS_MCMCcppBatch | ||
Rcpp::List HiddenBASiCS_MCMCcppBatch(int N, int thin, int burn, NumericMatrix Counts, NumericMatrix BatchDesign, NumericVector mu0, NumericVector delta0, NumericVector phi0, NumericVector s0, NumericVector nu0, double theta0, double s2mu, double adelta, double bdelta, NumericVector p_Phi, double as, double bs, double atheta, double btheta, double ar, NumericVector LSmu0, NumericVector LSdelta0, double LSphi0, NumericVector LSnu0, double LStheta0, NumericVector sumByCellAll, NumericVector sumByCellBio, NumericVector sumByGeneAll, NumericVector sumByGeneBio, int StoreAdapt, int EndAdapt, int PrintProgress, double s2_delta, double prior_delta); | ||
RcppExport SEXP _BASiCS_HiddenBASiCS_MCMCcppBatch(SEXP NSEXP, SEXP thinSEXP, SEXP burnSEXP, SEXP CountsSEXP, SEXP BatchDesignSEXP, SEXP mu0SEXP, SEXP delta0SEXP, SEXP phi0SEXP, SEXP s0SEXP, SEXP nu0SEXP, SEXP theta0SEXP, SEXP s2muSEXP, SEXP adeltaSEXP, SEXP bdeltaSEXP, SEXP p_PhiSEXP, SEXP asSEXP, SEXP bsSEXP, SEXP athetaSEXP, SEXP bthetaSEXP, SEXP arSEXP, SEXP LSmu0SEXP, SEXP LSdelta0SEXP, SEXP LSphi0SEXP, SEXP LSnu0SEXP, SEXP LStheta0SEXP, SEXP sumByCellAllSEXP, SEXP sumByCellBioSEXP, SEXP sumByGeneAllSEXP, SEXP sumByGeneBioSEXP, SEXP StoreAdaptSEXP, SEXP EndAdaptSEXP, SEXP PrintProgressSEXP, SEXP s2_deltaSEXP, SEXP prior_deltaSEXP) { | ||
BEGIN_RCPP | ||
Rcpp::RObject rcpp_result_gen; | ||
Rcpp::RNGScope rcpp_rngScope_gen; | ||
Rcpp::traits::input_parameter< int >::type N(NSEXP); | ||
Rcpp::traits::input_parameter< int >::type thin(thinSEXP); | ||
Rcpp::traits::input_parameter< int >::type burn(burnSEXP); | ||
Rcpp::traits::input_parameter< NumericMatrix >::type Counts(CountsSEXP); | ||
Rcpp::traits::input_parameter< NumericMatrix >::type BatchDesign(BatchDesignSEXP); | ||
Rcpp::traits::input_parameter< NumericVector >::type mu0(mu0SEXP); | ||
Rcpp::traits::input_parameter< NumericVector >::type delta0(delta0SEXP); | ||
Rcpp::traits::input_parameter< NumericVector >::type phi0(phi0SEXP); | ||
Rcpp::traits::input_parameter< NumericVector >::type s0(s0SEXP); | ||
Rcpp::traits::input_parameter< NumericVector >::type nu0(nu0SEXP); | ||
Rcpp::traits::input_parameter< double >::type theta0(theta0SEXP); | ||
Rcpp::traits::input_parameter< double >::type s2mu(s2muSEXP); | ||
Rcpp::traits::input_parameter< double >::type adelta(adeltaSEXP); | ||
Rcpp::traits::input_parameter< double >::type bdelta(bdeltaSEXP); | ||
Rcpp::traits::input_parameter< NumericVector >::type p_Phi(p_PhiSEXP); | ||
Rcpp::traits::input_parameter< double >::type as(asSEXP); | ||
Rcpp::traits::input_parameter< double >::type bs(bsSEXP); | ||
Rcpp::traits::input_parameter< double >::type atheta(athetaSEXP); | ||
Rcpp::traits::input_parameter< double >::type btheta(bthetaSEXP); | ||
Rcpp::traits::input_parameter< double >::type ar(arSEXP); | ||
Rcpp::traits::input_parameter< NumericVector >::type LSmu0(LSmu0SEXP); | ||
Rcpp::traits::input_parameter< NumericVector >::type LSdelta0(LSdelta0SEXP); | ||
Rcpp::traits::input_parameter< double >::type LSphi0(LSphi0SEXP); | ||
Rcpp::traits::input_parameter< NumericVector >::type LSnu0(LSnu0SEXP); | ||
Rcpp::traits::input_parameter< double >::type LStheta0(LStheta0SEXP); | ||
Rcpp::traits::input_parameter< NumericVector >::type sumByCellAll(sumByCellAllSEXP); | ||
Rcpp::traits::input_parameter< NumericVector >::type sumByCellBio(sumByCellBioSEXP); | ||
Rcpp::traits::input_parameter< NumericVector >::type sumByGeneAll(sumByGeneAllSEXP); | ||
Rcpp::traits::input_parameter< NumericVector >::type sumByGeneBio(sumByGeneBioSEXP); | ||
Rcpp::traits::input_parameter< int >::type StoreAdapt(StoreAdaptSEXP); | ||
Rcpp::traits::input_parameter< int >::type EndAdapt(EndAdaptSEXP); | ||
Rcpp::traits::input_parameter< int >::type PrintProgress(PrintProgressSEXP); | ||
Rcpp::traits::input_parameter< double >::type s2_delta(s2_deltaSEXP); | ||
Rcpp::traits::input_parameter< double >::type prior_delta(prior_deltaSEXP); | ||
rcpp_result_gen = Rcpp::wrap(HiddenBASiCS_MCMCcppBatch(N, thin, burn, Counts, BatchDesign, mu0, delta0, phi0, s0, nu0, theta0, s2mu, adelta, bdelta, p_Phi, as, bs, atheta, btheta, ar, LSmu0, LSdelta0, LSphi0, LSnu0, LStheta0, sumByCellAll, sumByCellBio, sumByGeneAll, sumByGeneBio, StoreAdapt, EndAdapt, PrintProgress, s2_delta, prior_delta)); | ||
return rcpp_result_gen; | ||
END_RCPP | ||
} | ||
// HiddenBASiCS_MCMCcppNoSpikes | ||
Rcpp::List HiddenBASiCS_MCMCcppNoSpikes(int N, int thin, int burn, NumericMatrix Counts, NumericMatrix BatchDesign, NumericVector mu0, NumericVector delta0, NumericVector phi0, NumericVector nu0, double theta0, double s2mu, double adelta, double bdelta, double aphi, double bphi, double atheta, double btheta, double ar, NumericVector LSmu0, NumericVector LSdelta0, NumericVector LSnu0, double LStheta0, NumericVector sumByCellAll, NumericVector sumByGeneAll, int StoreAdapt, int EndAdapt, int PrintProgress, double s2_delta, double prior_delta, NumericVector BatchInfo, NumericVector BatchIds, NumericVector BatchSizes, NumericVector BatchOffSet, double Constrain, NumericVector Index, int RefGene, NumericVector RefGenes, NumericVector ConstrainGene, NumericVector NotConstrainGene, int ConstrainType); | ||
RcppExport SEXP _BASiCS_HiddenBASiCS_MCMCcppNoSpikes(SEXP NSEXP, SEXP thinSEXP, SEXP burnSEXP, SEXP CountsSEXP, SEXP BatchDesignSEXP, SEXP mu0SEXP, SEXP delta0SEXP, SEXP phi0SEXP, SEXP nu0SEXP, SEXP theta0SEXP, SEXP s2muSEXP, SEXP adeltaSEXP, SEXP bdeltaSEXP, SEXP aphiSEXP, SEXP bphiSEXP, SEXP athetaSEXP, SEXP bthetaSEXP, SEXP arSEXP, SEXP LSmu0SEXP, SEXP LSdelta0SEXP, SEXP LSnu0SEXP, SEXP LStheta0SEXP, SEXP sumByCellAllSEXP, SEXP sumByGeneAllSEXP, SEXP StoreAdaptSEXP, SEXP EndAdaptSEXP, SEXP PrintProgressSEXP, SEXP s2_deltaSEXP, SEXP prior_deltaSEXP, SEXP BatchInfoSEXP, SEXP BatchIdsSEXP, SEXP BatchSizesSEXP, SEXP BatchOffSetSEXP, SEXP ConstrainSEXP, SEXP IndexSEXP, SEXP RefGeneSEXP, SEXP RefGenesSEXP, SEXP ConstrainGeneSEXP, SEXP NotConstrainGeneSEXP, SEXP ConstrainTypeSEXP) { | ||
BEGIN_RCPP | ||
Rcpp::RObject rcpp_result_gen; | ||
Rcpp::RNGScope rcpp_rngScope_gen; | ||
Rcpp::traits::input_parameter< int >::type N(NSEXP); | ||
Rcpp::traits::input_parameter< int >::type thin(thinSEXP); | ||
Rcpp::traits::input_parameter< int >::type burn(burnSEXP); | ||
Rcpp::traits::input_parameter< NumericMatrix >::type Counts(CountsSEXP); | ||
Rcpp::traits::input_parameter< NumericMatrix >::type BatchDesign(BatchDesignSEXP); | ||
Rcpp::traits::input_parameter< NumericVector >::type mu0(mu0SEXP); | ||
Rcpp::traits::input_parameter< NumericVector >::type delta0(delta0SEXP); | ||
Rcpp::traits::input_parameter< NumericVector >::type phi0(phi0SEXP); | ||
Rcpp::traits::input_parameter< NumericVector >::type nu0(nu0SEXP); | ||
Rcpp::traits::input_parameter< double >::type theta0(theta0SEXP); | ||
Rcpp::traits::input_parameter< double >::type s2mu(s2muSEXP); | ||
Rcpp::traits::input_parameter< double >::type adelta(adeltaSEXP); | ||
Rcpp::traits::input_parameter< double >::type bdelta(bdeltaSEXP); | ||
Rcpp::traits::input_parameter< double >::type aphi(aphiSEXP); | ||
Rcpp::traits::input_parameter< double >::type bphi(bphiSEXP); | ||
Rcpp::traits::input_parameter< double >::type atheta(athetaSEXP); | ||
Rcpp::traits::input_parameter< double >::type btheta(bthetaSEXP); | ||
Rcpp::traits::input_parameter< double >::type ar(arSEXP); | ||
Rcpp::traits::input_parameter< NumericVector >::type LSmu0(LSmu0SEXP); | ||
Rcpp::traits::input_parameter< NumericVector >::type LSdelta0(LSdelta0SEXP); | ||
Rcpp::traits::input_parameter< NumericVector >::type LSnu0(LSnu0SEXP); | ||
Rcpp::traits::input_parameter< double >::type LStheta0(LStheta0SEXP); | ||
Rcpp::traits::input_parameter< NumericVector >::type sumByCellAll(sumByCellAllSEXP); | ||
Rcpp::traits::input_parameter< NumericVector >::type sumByGeneAll(sumByGeneAllSEXP); | ||
Rcpp::traits::input_parameter< int >::type StoreAdapt(StoreAdaptSEXP); | ||
Rcpp::traits::input_parameter< int >::type EndAdapt(EndAdaptSEXP); | ||
Rcpp::traits::input_parameter< int >::type PrintProgress(PrintProgressSEXP); | ||
Rcpp::traits::input_parameter< double >::type s2_delta(s2_deltaSEXP); | ||
Rcpp::traits::input_parameter< double >::type prior_delta(prior_deltaSEXP); | ||
Rcpp::traits::input_parameter< NumericVector >::type BatchInfo(BatchInfoSEXP); | ||
Rcpp::traits::input_parameter< NumericVector >::type BatchIds(BatchIdsSEXP); | ||
Rcpp::traits::input_parameter< NumericVector >::type BatchSizes(BatchSizesSEXP); | ||
Rcpp::traits::input_parameter< NumericVector >::type BatchOffSet(BatchOffSetSEXP); | ||
Rcpp::traits::input_parameter< double >::type Constrain(ConstrainSEXP); | ||
Rcpp::traits::input_parameter< NumericVector >::type Index(IndexSEXP); | ||
Rcpp::traits::input_parameter< int >::type RefGene(RefGeneSEXP); | ||
Rcpp::traits::input_parameter< NumericVector >::type RefGenes(RefGenesSEXP); | ||
Rcpp::traits::input_parameter< NumericVector >::type ConstrainGene(ConstrainGeneSEXP); | ||
Rcpp::traits::input_parameter< NumericVector >::type NotConstrainGene(NotConstrainGeneSEXP); | ||
Rcpp::traits::input_parameter< int >::type ConstrainType(ConstrainTypeSEXP); | ||
rcpp_result_gen = Rcpp::wrap(HiddenBASiCS_MCMCcppNoSpikes(N, thin, burn, Counts, BatchDesign, mu0, delta0, phi0, nu0, theta0, s2mu, adelta, bdelta, aphi, bphi, atheta, btheta, ar, LSmu0, LSdelta0, LSnu0, LStheta0, sumByCellAll, sumByGeneAll, StoreAdapt, EndAdapt, PrintProgress, s2_delta, prior_delta, BatchInfo, BatchIds, BatchSizes, BatchOffSet, Constrain, Index, RefGene, RefGenes, ConstrainGene, NotConstrainGene, ConstrainType)); | ||
return rcpp_result_gen; | ||
END_RCPP | ||
} | ||
|
||
static const R_CallMethodDef CallEntries[] = { | ||
{"_BASiCS_HiddenBASiCS_MCMCcpp", (DL_FUNC) &_BASiCS_HiddenBASiCS_MCMCcpp, 33}, | ||
{"_BASiCS_HiddenBASiCS_MCMCcppBatch", (DL_FUNC) &_BASiCS_HiddenBASiCS_MCMCcppBatch, 34}, | ||
{"_BASiCS_HiddenBASiCS_MCMCcppNoSpikes", (DL_FUNC) &_BASiCS_HiddenBASiCS_MCMCcppNoSpikes, 40}, | ||
{NULL, NULL, 0} | ||
}; | ||
|
||
RcppExport void R_init_BASiCS(DllInfo *dll) { | ||
R_registerRoutines(dll, NULL, CallEntries, NULL, NULL); | ||
R_useDynamicSymbols(dll, FALSE); | ||
} |