# NOT RUN {
# 1) generate an iid uniformly-distributed random matrix of 1000x3
pmatrix <- cbind(runif(1000), runif(1000), runif(1000))
# 2) aggregate according to the order statistics
ap <- dPvalAggregate(pmatrix, method="orderStatistic")
# 3) aggregate according to the Fisher's method
ap <- dPvalAggregate(pmatrix, method="fishers")
# 4) aggregate according to the Z-transform method
ap <- dPvalAggregate(pmatrix, method="Ztransform")
# 5) aggregate according to the logistic method
ap <- dPvalAggregate(pmatrix, method="logistic")
# }
Run the code above in your browser using DataLab