# NOT RUN {
LambdaList <- list(Group1 <- matrix(c(1.00, 0.74, 1.14, 0.92), ncol = 1),
Group2 <- matrix(c(1.00, 0.76, 1.31, 0.98), ncol = 1))
ThreshList <- list(Group1 <- c(0.00, 1.28, -0.82, 0.44),
Group2 <- c(0.00, 0.65, -0.77, 0.47))
MeanList <- list(Group1 <- 0.21,
Group2 <- 0.19)
VarList <- list(Group1 <- 1.76,
Group2 <- 1.34)
SDList <- list(Group1 <- c(2.12, 1.85, 1.12, 3.61),
Group2 <- c(NA, NA, NA, NA))
Groups <- c("Group1", "Group2")
RefGroup <- "Group2"
dmacs_summary(LambdaList, ThreshList, MeanList, VarList, SDList,
Groups, RefGroup)
# }
Run the code above in your browser using DataLab