wmahalanobis(WMDB)
wmahalanobis()所属R语言包:WMDB
Compute weighted Mahalanobis distance
计算加权马氏距离
译者:生物统计家园网 机器人LoveR
描述----------Description----------
compute weighted Mahalanobis distance between two samples
计算加权的两个样本之间的Mahalanobis距离
用法----------Usage----------
wmahalanobis(x, center, cov, weight)
参数----------Arguments----------
参数:x
vector or matrix of data with, say, p columns.
向量或矩阵的数据,比方说,p列。
参数:center
mean vector of the distribution or second data vector of length p
平均向量的分布或第二数据矢量的长度为p的
参数:cov
covariance matrix (p x p) of the distribution
协方差矩阵(P X P)的分布
参数:weight
the weight of the parameters
重量的参数
Details
详细信息----------Details----------
the weight of parameters is defined by users;if you do not define the weight,the corresponding percent contributions of the parameters based on the principal component analysis scheme will be used instead
参数的权重是由用户定义的,如果你没有定义的权重,相应的百分比贡献度主成分分析计划的基础上的参数将被用来代替
值----------Value----------
weighted Mahalanobis distance will be returned
加权马氏距离将被退回
(作者)----------Author(s)----------
Bingpei Wu
参考文献----------References----------
实例----------Examples----------
##---- Should be DIRECTLY executable !! ----[#----应该是直接的可执行文件! ----]
##-- ==> Define data, use random,[ - ==>定义数据,使用随机的,]
##-- or do help(data=index) for the standard data sets.[# - 帮助(数据=索引)的标准数据集。]
x=iris[1:50,1:4]
center=colMeans(x)
cov=var(x)
weight=diag(rep(0.25,4))
wmahalanobis(x,center,cov,weight)
## The function is currently defined as[#功能目前被定义为]
function (x, center, cov, weight)
{
if (is.vector(x))
x = matrix(x, ncol = length(x))
else x=as.matrix(x)
x <- sweep(x, 2, center)
cov <- weight %*% solve(cov)
retval <- diag(x %*% cov %*% t(x))
retval
}
转载请注明:出自 生物统计家园网(http://www.biostatistic.net)。
注:
注1:为了方便大家学习,本文档为生物统计家园网机器人LoveR翻译而成,仅供个人R语言学习参考使用,生物统计家园保留版权。
注2:由于是机器人自动翻译,难免有不准确之处,使用时仔细对照中、英文内容进行反复理解,可以帮助R语言的学习。
注3:如遇到不准确之处,请在本贴的后面进行回帖,我们会逐渐进行修订。
|