cushny(robustbase)
cushny()所属R语言包：robustbase
Cushny and Peebles Prolongation of Sleep Data
的Cushny和Peebles的延长睡眠数据
译者：生物统计家园网 机器人LoveR
描述----------Description----------
The original data set was bivariate and recorded for ten subjects the prolongation of sleep caused by two different drugs. These data were used by Student as the first illustration of the paired t-test which only needs the differences of the two measurements. These differences are the values of cushny.
原始数据集是二元和记录两种不同的药物引起的睡眠时间的延长为10名。这些数据被用来作为第一配对t-试验，其中只需要的两个测量值的差异的说明图，通过Student。这些差异值cushny。
用法----------Usage----------
data(cushny)
格式----------Format----------
numeric vector, sorted increasingly:<br> 0 0.8 1 1.2 1.3 1.3 1.4 1.8 2.4 4.6
数字矢量，越来越排序：参考0 0.8 1 1.2 1.3 1.3 1.4 1.8 2.4 4.6
源----------Source----------
Cushny, A.R. and Peebles, A.R. (1905) The action of optical isomers. II. Hyoscines. J. Physiol. 32, 501–510.
Cushny，A.R.和Peebles，A.R. （1905年）的光学异构体的动作。 II。 Hyoscines。生理学期刊。 32，501-510。
These data were used by Student(1908) as the first illustration of the paired t-test, see also sleep; then cited by Fisher (1925) and thereforth copied in numerous books as an example of a normally distributed sample, see, e.g., Anderson (1958).
这些数据被用来学生（1908年）的第一个例子的配对t检验，也sleep，然后由Fisher（1925）引用，和在很多书thereforth复制的正态分布的样本的一个例子，见，例如，Anderson（1958）。
参考文献----------References----------
The probable error of a mean. Biometrika 6, 1–25.
Statistical Methods for Research Workers; Oliver & Boyd, Edinburgh.
An Introduction to Multivariate Statistical Analysis; Wiley, N.Y.
Robust Statistics: The Approach Based on Influence Functions; Wiley, N.Y.
实例----------Examples----------
data(cushny)
plot(cushny, rep(0, 10), pch = 3, cex = 3,
ylab = "", yaxt = "n")
plot(jitter(cushny), rep(0, 10), pch = 3, cex = 2,
main = "'cushny' data (n= 10)", ylab = "", yaxt = "n")
abline(h=0, col="gray", lty=3)
myPt <- function(m, lwd = 2, ..., e = 1.5*par("cxy")[2])
segments(m, +e, m, -e, lwd = lwd, ...)
myPt( mean(cushny), col = "pink3")
myPt(median(cushny), col = "light blue")
legend("topright", c("mean", "median"), lwd = 2,
col = c("pink3", "light blue"), inset = .01)
## The 'sleep' data from the standard 'datasets' package:[＃“睡眠”的标准数据集的数据包：]
d.sleep <- local({ gr <- with(datasets::sleep, split(extra, group))
gr[[2]] - gr[[1]] })
stopifnot(all.equal(cushny,
sort(d.sleep), tol=1e-15))
转载请注明:出自 生物统计家园网(http://www.biostatistic.net)。
注：
注1：为了方便大家学习，本文档为生物统计家园网机器人LoveR翻译而成，仅供个人R语言学习参考使用，生物统计家园保留版权。
注2：由于是机器人自动翻译，难免有不准确之处，使用时仔细对照中、英文内容进行反复理解，可以帮助R语言的学习。
注3：如遇到不准确之处，请在本贴的后面进行回帖，我们会逐渐进行修订。
|
发表于 2012-9-27 22:08:22
