Skip to content

Commit

Permalink
Release version 1.0.9
Browse files Browse the repository at this point in the history
  • Loading branch information
TReynkens committed Feb 10, 2020
1 parent 54d6b28 commit cfcfe2a
Show file tree
Hide file tree
Showing 4 changed files with 38 additions and 38 deletions.
4 changes: 2 additions & 2 deletions DESCRIPTION
Original file line number Diff line number Diff line change
@@ -1,6 +1,6 @@
Package: ReIns
Version: 1.0.8.9001
Date: 2018-10-09
Version: 1.0.9
Date: 2020-02-10
Title: Functions from "Reinsurance: Actuarial and Statistical Aspects"
Description: Functions from the book "Reinsurance: Actuarial and Statistical Aspects" (2017) by Hansjoerg Albrecher, Jan Beirlant and Jef Teugels <http://www.wiley.com/WileyCDA/WileyTitle/productCd-0470772689.html>.
Authors@R: c(
Expand Down
16 changes: 8 additions & 8 deletions R/RcppExports.R
Original file line number Diff line number Diff line change
@@ -1,6 +1,14 @@
# Generated by using Rcpp::compileAttributes() -> do not edit by hand
# Generator token: 10BE3573-1514-4C36-9D1C-5A225CD40393

stdf_cpp <- function(x, k, R, alpha) {
.Call(`_ReIns_stdf_cpp`, x, k, R, alpha)
}

stdf2_cpp <- function(x, k, X) {
.Call(`_ReIns_stdf2_cpp`, x, k, X)
}

spliceEM_splicefit_raw_Rexport <- function(pi, theta, shape, beta, gamma, lower1, lower2, lower3, lower4, lower5, upper3, upper4, upper5, trunclower, tsplice, truncupper, eps, beta_tol, maxiter) {
.Call(`_ReIns_spliceEM_splicefit_raw_Rexport`, pi, theta, shape, beta, gamma, lower1, lower2, lower3, lower4, lower5, upper3, upper4, upper5, trunclower, tsplice, truncupper, eps, beta_tol, maxiter)
}
Expand All @@ -13,11 +21,3 @@ spliceEM_shape_red <- function(pi_in, theta_in, shape_in, beta_in, gamma_in, low
.Call(`_ReIns_spliceEM_shape_red`, pi_in, theta_in, shape_in, beta_in, gamma_in, lower1, lower2, lower3, lower4, lower5, upper3, upper4, upper5, trunclower, tsplice, truncupper, criterium, improve, eps, beta_tol, maxiter, adj)
}

stdf_cpp <- function(x, k, R, alpha) {
.Call(`_ReIns_stdf_cpp`, x, k, R, alpha)
}

stdf2_cpp <- function(x, k, X) {
.Call(`_ReIns_stdf2_cpp`, x, k, X)
}

2 changes: 1 addition & 1 deletion inst/NEWS.Rd
Original file line number Diff line number Diff line change
Expand Up @@ -3,7 +3,7 @@
\encoding{UTF-8}


\section{Changes in version 1.0.9 (2018-yy-xx)}{
\section{Changes in version 1.0.9 (2020-02-10)}{

\subsection{Changes in \code{R} code:}{
\itemize{
Expand Down
54 changes: 27 additions & 27 deletions src/RcppExports.cpp
Original file line number Diff line number Diff line change
Expand Up @@ -5,6 +5,33 @@

using namespace Rcpp;

// stdf_cpp
double stdf_cpp(const NumericVector& x, const int k, const NumericMatrix& R, const double alpha);
RcppExport SEXP _ReIns_stdf_cpp(SEXP xSEXP, SEXP kSEXP, SEXP RSEXP, SEXP alphaSEXP) {
BEGIN_RCPP
Rcpp::RObject rcpp_result_gen;
Rcpp::RNGScope rcpp_rngScope_gen;
Rcpp::traits::input_parameter< const NumericVector& >::type x(xSEXP);
Rcpp::traits::input_parameter< const int >::type k(kSEXP);
Rcpp::traits::input_parameter< const NumericMatrix& >::type R(RSEXP);
Rcpp::traits::input_parameter< const double >::type alpha(alphaSEXP);
rcpp_result_gen = Rcpp::wrap(stdf_cpp(x, k, R, alpha));
return rcpp_result_gen;
END_RCPP
}
// stdf2_cpp
double stdf2_cpp(const NumericVector& x, const int k, NumericMatrix& X);
RcppExport SEXP _ReIns_stdf2_cpp(SEXP xSEXP, SEXP kSEXP, SEXP XSEXP) {
BEGIN_RCPP
Rcpp::RObject rcpp_result_gen;
Rcpp::RNGScope rcpp_rngScope_gen;
Rcpp::traits::input_parameter< const NumericVector& >::type x(xSEXP);
Rcpp::traits::input_parameter< const int >::type k(kSEXP);
Rcpp::traits::input_parameter< NumericMatrix& >::type X(XSEXP);
rcpp_result_gen = Rcpp::wrap(stdf2_cpp(x, k, X));
return rcpp_result_gen;
END_RCPP
}
// spliceEM_splicefit_raw_Rexport
List spliceEM_splicefit_raw_Rexport(const double pi, const double theta, const IntegerVector shape, const NumericVector beta, const double gamma, const NumericVector lower1, const NumericVector lower2, const NumericVector lower3, const NumericVector lower4, const NumericVector lower5, const NumericVector upper3, const NumericVector upper4, const NumericVector upper5, const double trunclower, const double tsplice, const double truncupper, const double eps, const double beta_tol, const double maxiter);
RcppExport SEXP _ReIns_spliceEM_splicefit_raw_Rexport(SEXP piSEXP, SEXP thetaSEXP, SEXP shapeSEXP, SEXP betaSEXP, SEXP gammaSEXP, SEXP lower1SEXP, SEXP lower2SEXP, SEXP lower3SEXP, SEXP lower4SEXP, SEXP lower5SEXP, SEXP upper3SEXP, SEXP upper4SEXP, SEXP upper5SEXP, SEXP trunclowerSEXP, SEXP tspliceSEXP, SEXP truncupperSEXP, SEXP epsSEXP, SEXP beta_tolSEXP, SEXP maxiterSEXP) {
Expand Down Expand Up @@ -95,30 +122,3 @@ BEGIN_RCPP
return rcpp_result_gen;
END_RCPP
}
// stdf_cpp
double stdf_cpp(const NumericVector& x, const int k, const NumericMatrix& R, const double alpha);
RcppExport SEXP _ReIns_stdf_cpp(SEXP xSEXP, SEXP kSEXP, SEXP RSEXP, SEXP alphaSEXP) {
BEGIN_RCPP
Rcpp::RObject rcpp_result_gen;
Rcpp::RNGScope rcpp_rngScope_gen;
Rcpp::traits::input_parameter< const NumericVector& >::type x(xSEXP);
Rcpp::traits::input_parameter< const int >::type k(kSEXP);
Rcpp::traits::input_parameter< const NumericMatrix& >::type R(RSEXP);
Rcpp::traits::input_parameter< const double >::type alpha(alphaSEXP);
rcpp_result_gen = Rcpp::wrap(stdf_cpp(x, k, R, alpha));
return rcpp_result_gen;
END_RCPP
}
// stdf2_cpp
double stdf2_cpp(const NumericVector& x, const int k, NumericMatrix& X);
RcppExport SEXP _ReIns_stdf2_cpp(SEXP xSEXP, SEXP kSEXP, SEXP XSEXP) {
BEGIN_RCPP
Rcpp::RObject rcpp_result_gen;
Rcpp::RNGScope rcpp_rngScope_gen;
Rcpp::traits::input_parameter< const NumericVector& >::type x(xSEXP);
Rcpp::traits::input_parameter< const int >::type k(kSEXP);
Rcpp::traits::input_parameter< NumericMatrix& >::type X(XSEXP);
rcpp_result_gen = Rcpp::wrap(stdf2_cpp(x, k, X));
return rcpp_result_gen;
END_RCPP
}

0 comments on commit cfcfe2a

Please sign in to comment.