medianPolish.matrix(aroma.light)
medianPolish.matrix()所属R语言包:aroma.light
Median polish
中位数波兰
译者:生物统计家园网 机器人LoveR
描述----------Description----------
Median polish.
中位数波兰。
用法----------Usage----------
参数----------Arguments----------
参数:X
N-times-K matrix
N次 - Kmatrix
参数:tol
A numeric value greater than zero used as a threshold to identify when the algorithm has converged.
一个numeric值大于作为一个阈值,用于识别算法收敛时零。
参数:maxIter
Maximum number of iterations.
最大迭代次数。
参数:na.rm
If TRUE (FALSE), NAs are exclude (not exclude). If NA, it is assumed that X contains no NA values.
如果TRUE(FALSE)NAS排除(不排除)。如果NA,它是假设,X不包含NA值。
参数:.addExtra
If TRUE, the name of argument X is returned and the returned structure is assigned a class. This will make the result compatible what medpolish returns.
如果TRUE,参数X名返回和返回的结构是分配一类。这将使结果兼容什么medpolish回报。
参数:...
Not used.
不使用。
Details
详情----------Details----------
The implementation of this method give identical estimates as medpolish, but is about 3-5 times more efficient when there are no NA values.
这种方法的实施,给medpolish,相同的估计,但约3-5倍,更有效,有没有NA值。
值----------Value----------
Returns a named list structure with elements:
返回一个名为list结构的元素:
参数:overall
The fitted constant term.
拟合常数项。
参数:row
The fitted row effect.
拟合行效果。
参数:col
The fitted column effect.
装柱效果。
参数:residuals
The residuals.
残差。
参数:converged
If TRUE, the algorithm converged, otherwise not.
如果TRUE,融合算法,否则不。
作者(S)----------Author(s)----------
Henrik Bengtsson (<a href="http://www.braju.com/R/">http://www.braju.com/R/</a>)
参见----------See Also----------
medpolish.
medpolish。
举例----------Examples----------
# Deaths from sport parachuting; from ABC of EDA, p.224:[从运动跳伞死亡;从ABC EDA技术,第224页:]
deaths <- matrix(c(14,15,14, 7,4,7, 8,2,10, 15,9,10, 0,2,0), ncol=3, byrow=TRUE)
rownames(deaths) <- c("1-24", "25-74", "75-199", "200++", "NA")
colnames(deaths) <- 1973:1975
print(deaths)
mp <- medianPolish(deaths)
mp1 <- medpolish(deaths, trace=FALSE)
print(mp)
ff <- c("overall", "row", "col", "residuals")
stopifnot(all.equal(mp[ff], mp1[ff]))
# Validate decomposition:[验证分解:]
stopifnot(all.equal(deaths, mp$overall+outer(mp$row,mp$col,"+")+mp$resid))
转载请注明:出自 生物统计家园网(http://www.biostatistic.net)。
注:
注1:为了方便大家学习,本文档为生物统计家园网机器人LoveR翻译而成,仅供个人R语言学习参考使用,生物统计家园保留版权。
注2:由于是机器人自动翻译,难免有不准确之处,使用时仔细对照中、英文内容进行反复理解,可以帮助R语言的学习。
注3:如遇到不准确之处,请在本贴的后面进行回帖,我们会逐渐进行修订。
|