Test (some) possible contractions of the hyperrectangle
contract(
par = par,
xp_pos = envir$xp_pos,
state_pos = envir$state_pos,
xp_neg = envir$xp_neg,
state_neg = envir$state_neg,
n = envir$n,
TP = envir$TP,
TN = envir$TN,
beta = envir$beta2,
envir = parent.frame()
)
Current parametrization of the hyperrectangle
Expression matrix for positive events
State vector of the positive events
Expression matrix for negative events
State vector of the negative events
passed to f
integer: current number of TP
integer: current number of TN
Passed from the top-level function
Current environment of the optimization