/* C Header */
/*
Copyright (C) 2017-2021 Torsten Hothorn
This file is part of the 'libcoin' R add-on package.
'libcoin' is free software: you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
the Free Software Foundation, version 2.
'libcoin' is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
GNU General Public License for more details.
You should have received a copy of the GNU General Public License
along with 'libcoin'. If not, see <http://www.gnu.org/licenses/>.
DO NOT EDIT THIS FILE
Edit 'libcoin.w' and run 'nuweb -r libcoin.w'
*/
#include "libcoin_internal.h"
/* Function Prototypes */
extern
SEXP R_ExpectationCovarianceStatistic
(
/* User Interface Input */
/* R x Input */
SEXP x,
/* R y Input */
SEXP y,
/* R weights Input */
SEXP weights
,
/* R subset Input */
SEXP subset
,
/* R block Input */
SEXP block
,
SEXP varonly,
SEXP tol
)
;
extern
SEXP R_PermutedLinearStatistic
(
/* User Interface Input */
/* R x Input */
SEXP x,
/* R y Input */
SEXP y,
/* R weights Input */
SEXP weights
,
/* R subset Input */
SEXP subset
,
/* R block Input */
SEXP block
,
SEXP nresample
)
;
extern
SEXP R_StandardisePermutedLinearStatistic
(
SEXP LECV
)
;
extern
SEXP R_ExpectationCovarianceStatistic_2d
(
/* 2d User Interface Input */
/* R x Input */
SEXP x,
SEXP ix,
/* R y Input */
SEXP y,
SEXP iy,
/* R weights Input */
SEXP weights
,
/* R subset Input */
SEXP subset
,
/* R block Input */
SEXP block
,
SEXP varonly,
SEXP tol
)
;
extern
SEXP R_PermutedLinearStatistic_2d
(
/* R x Input */
SEXP x,
SEXP ix,
/* R y Input */
SEXP y,
SEXP iy,
/* R block Input */
SEXP block
,
SEXP nresample,
SEXP itable
)
;
extern
SEXP R_QuadraticTest
(
/* R LECV Input */
SEXP LECV
,
SEXP pvalue,
SEXP lower,
SEXP give_log,
SEXP PermutedStatistics
)
;
extern
SEXP R_MaximumTest
(
/* R LECV Input */
SEXP LECV
,
SEXP alternative,
SEXP pvalue,
SEXP lower,
SEXP give_log,
SEXP PermutedStatistics,
SEXP maxpts,
SEXP releps,
SEXP abseps
)
;
extern
SEXP R_MaximallySelectedTest
(
SEXP LECV,
SEXP ordered,
SEXP teststat,
SEXP minbucket,
SEXP lower,
SEXP give_log
)
;
extern
SEXP R_ExpectationInfluence
(
/* R y Input */
SEXP y,
/* R weights Input */
SEXP weights
,
/* R subset Input */
SEXP subset
)
;
extern
SEXP R_CovarianceInfluence
(
/* R y Input */
SEXP y,
/* R weights Input */
SEXP weights
,
/* R subset Input */
SEXP subset
,
SEXP varonly
)
;
extern
SEXP R_ExpectationX
(
/* R x Input */
SEXP x,
SEXP P,
/* R weights Input */
SEXP weights
,
/* R subset Input */
SEXP subset
)
;
extern
SEXP R_CovarianceX
(
/* R x Input */
SEXP x,
SEXP P,
/* R weights Input */
SEXP weights
,
/* R subset Input */
SEXP subset
,
SEXP varonly
)
;
extern
SEXP R_Sums
(
/* R N Input */
SEXP N,
/* R weights Input */
SEXP weights
,
/* R subset Input */
SEXP subset
)
;
extern
SEXP R_KronSums
(
/* R x Input */
SEXP x,
SEXP P,
/* R y Input */
SEXP y,
/* R weights Input */
SEXP weights
,
/* R subset Input */
SEXP subset
,
SEXP symmetric
)
;
extern
SEXP R_KronSums_Permutation
(
/* R x Input */
SEXP x,
SEXP P,
/* R y Input */
SEXP y,
/* R subset Input */
SEXP subset
,
SEXP subsety
)
;
extern
SEXP R_colSums
(
/* R x Input */
SEXP x,
/* R weights Input */
SEXP weights
,
/* R subset Input */
SEXP subset
)
;
extern
SEXP R_OneTableSums
(
/* R x Input */
SEXP x,
/* R weights Input */
SEXP weights
,
/* R subset Input */
SEXP subset
)
;
extern
SEXP R_TwoTableSums
(
/* R x Input */
SEXP x,
/* R y Input */
SEXP y,
/* R weights Input */
SEXP weights
,
/* R subset Input */
SEXP subset
)
;
extern
SEXP R_ThreeTableSums
(
/* R x Input */
SEXP x,
/* R y Input */
SEXP y,
/* R block Input */
SEXP block
,
/* R weights Input */
SEXP weights
,
/* R subset Input */
SEXP subset
)
;
extern
SEXP R_order_subset_wrt_block
(
/* R y Input */
SEXP y,
/* R weights Input */
SEXP weights
,
/* R subset Input */
SEXP subset
,
/* R block Input */
SEXP block
)
;
extern
SEXP R_quadform
(
SEXP linstat,
SEXP expect,
SEXP MPinv_sym
)
;
extern
SEXP R_kronecker
(
SEXP A,
SEXP B
)
;
extern
SEXP R_MPinv_sym
(
SEXP x,
SEXP n,
SEXP tol
)
;
extern
SEXP R_unpack_sym
(
SEXP x,
SEXP names,
SEXP diagonly
)
;
extern
SEXP R_pack_sym
(
SEXP x
)
;