The R Project SVN R

Rev

Rev 88624 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 88624 Rev 90102
Line 167... Line 167...
167 
ks.test(x, x2, alternative = "l")
 167 
ks.test(x, x2, alternative = "l")
168 
 
 168 
 
169 
# with ties, example from Schröer and Trenkler (1995)
 169 
# with ties, example from Schröer and Trenkler (1995)
170 
# D = 3/7, p = 8/33 = 0.242424..
 170 
# D = 3/7, p = 8/33 = 0.242424..
171 
ks.test(c(1, 2, 2, 3, 3),
 171 
ks.test(c(1, 2, 2, 3, 3),
172 
        c(1, 2, 3, 3, 4, 5, 6))# -> exact
 172 
        c(1, 2,    3, 3, 4, 5, 6))# -> exact
173 
 
 173 
 
174 
# formula interface, see ?wilcox.test
 174 
# formula interface, see ?wilcox.test
175 
ks.test(Ozone ~ Month, data = airquality,
 175 
ks.test(Ozone ~ Month, data = airquality,
176 
        subset = Month \%in\% c(5, 8))
 176 
        subset = Month \%in\% c(5, 8))
177 
}
 177 
}