conditionCheck: Condition check for strong FWER control in RGA
Description
Check the sufficient condition in RGA for the strong FWER control.
Usage
conditionCheck(w, G)
Arguments
w
a vector of initial weights
G
a matrix of initial transaction weights
Value
a logical value indicating whether the RGA's conditions are satisfied or not for the strong FWER control
Details
The conditions verified here are sufficient conditions. If a logical value TRUE is returned, then the strong control of the FWER is guaranteed. The strong control of the FWER may still hold even if the output is FALSE.
# NOT RUN {w <- c(0.1,0.2,0.3,0.4)
G <- matrix(c(0,0.3,0.3,0.4, 0.6,0,0.2,0.2, 0.5,0.2,0,0.3, 0.3,0.4,0.3,0),nrow=4,byrow=TRUE)
conditionCheck(w=w,G=G)
# }