rmf.vector(rstiefel)
rmf.vector()所属R语言包:rstiefel
Simulate a Random Normal Vector
模拟随机法向量。
译者:生物统计家园网 机器人LoveR
描述----------Description----------
Simulate a random normal vector from the von Mises-Fisher distribution as described in Wood(1994).
随机模拟法向量·冯·米塞斯Fisher分布木材(1994年)中描述的。
用法----------Usage----------
rmf.vector(kmu)
参数----------Arguments----------
参数:kmu
a vector.
一个向量。
值----------Value----------
a vector.
一个向量。
(作者)----------Author(s)----------
Peter Hoff
参考文献----------References----------
实例----------Examples----------
## The function is currently defined as[#功能目前被定义为]
function (kmu)
{
kap <- sqrt(sum(kmu^2))
mu <- kmu/kap
m <- length(mu)
if (kap == 0) {
u <- rnorm(length(kmu))
u <- u/sqrt(sum(u^2))
}
if (kap > 0) {
if (m == 1) {
u <- (-1)^rbinom(1, 1, 1/(1 + exp(2 * kap * mu)))
}
if (m > 1) {
W <- rW(kap, m)
V <- rnorm(m - 1)
V <- V/sqrt(sum(V^2))
x <- c((1 - W^2)^0.5 * t(V), W)
u <- cbind(NullC(mu), mu) %*% x
}
}
u
}
转载请注明:出自 生物统计家园网(http://www.biostatistic.net)。
注:
注1:为了方便大家学习,本文档为生物统计家园网机器人LoveR翻译而成,仅供个人R语言学习参考使用,生物统计家园保留版权。
注2:由于是机器人自动翻译,难免有不准确之处,使用时仔细对照中、英文内容进行反复理解,可以帮助R语言的学习。
注3:如遇到不准确之处,请在本贴的后面进行回帖,我们会逐渐进行修订。
|