Mucociliary: Mucociliary Clearance
In ACSWR: A Companion Package for the Book "A Course in Statistics with R"

Description Usage Format References Examples

Table 6.1 of Hollander and Wolfe (1999) lists the data for Half-Time of Mucociliary Clearance. We need to test if the time across various treatments is equal or not.

1	data(Mucociliary)

A data frame with 14 observations on the following 2 variables.

Treatment: treatment levels Asbestosis Normal Subjects Obstructive Airways Disease
Time: half-time of mucociliary clearance

Hollander, M., and Wolfe, D. A. (1973-99). Nonparametric Statistical Methods, 2e. J. Wiley.

data(Mucociliary)
Mucociliary$Rank <- rank(Mucociliary$Time)
aggregate(Mucociliary$Rank,by=list(Mucociliary$Treatment),sum)
kruskal.test(Time~Treatment,data=Mucociliary)