IntersectHypotheses: Intersection of hypotheses

Description

Generation of the hypotheses tree of a closed testing procedure (CTP). The function returns an object of oldClass "ctp.str"; summary and Display can be applied.

Usage

IntersectHypotheses(hyplst)

Arguments

hyplst

A list of integer vectors representing the elementary hypotheses.

Value

hypothesis The hypothesis tree described as lists hypotheses at each intersection level.
relations The relation structure of the hypotheses tree used for plotting.
hypnames Character representations of the hypotheses used for summary tables and plotting.
connections The connections used for calculating the adjusted p-values.

Details

Sets of elementary hypotheses are described by lists of integer vectors eg. list(1:2, c(1,3), c(1,4)) if the populations 2, 3 and 4 have to be compared to population 1. For the generation of the hypothesis tree of a closed testing procedure first all intersections of the elementary hypothese; then all intersections of these intersections etc. have to be created. The set of hypotheses at each intersection level must be reduced by deleting double hypotheses and creating unions. The size of the hypothesis tree increases rapidly with growing number of elementary hypotheses, which can lead to memory and/or time problems! The intersection procedure ends if a single hypothesis (the global hypothesis) is left.

Examples

Run this code

# NOT RUN {
hlist  <- list(1:2, c(1,3), c(1,4))
htree  <- IntersectHypotheses(hlist)
summary(htree)
Display(htree)


# compare in a set of six means all others to the fourth mean
#
five.to.fourth <- IntersectHypotheses(list(c(1,4),c(2,4),c(3,4),c(4,5),c(4,6)))
Display(five.to.fourth)

# }