Perturbation(rvgtest)
Perturbation()所属R语言包：rvgtest
Generate Random Variates from a Perturbed RVG
生成随机变量，从一个扰动RVG
译者：生物统计家园网 机器人LoveR
描述----------Description----------
These functions perturb the distribution of a given random variate generator. Thus it allows to investigate the power of tests for random variate generators.
这些功能的一个给定的随机变量产生扰动分布。因此，它允许调查随机变量产生的力量测试。
用法----------Usage----------
pertadd(n, rdist = rnorm, ..., min = 0, max = 1, p = 0.001)
pertsub(n, rdist = rnorm, ..., min = 0, max = 1, p = 0.001)
参数----------Arguments----------
参数：n
sample size.
样本大小。
参数：rdist
given RVG to be perturbed.
RVG扰动的。
参数：...
parameters for given random variate generator.
对于给定的随机变量发生器的参数。
参数：min, max
left and right boundary of perturbed domain.
左边和右边界扰动域。
参数：p
strength of perturbation.
扰动强度。
Details
详细信息----------Details----------
pertadd generates random variates from a mixture of rdist and a uniform distribution on the interval (min,max). The uniform distribution is chosen with probability p.
pertadd产生的混合物的rdist的时间间隔（min，max）和均匀分布的随机变数。均匀分布的概率p选择。
pertsub generates random variates from the rdist but rejects all points in the interval (min,max) with probability p.
pertsub生成随机变数rdist但，拒绝所有点的时间间隔（min，max）的概率p。
By varying the width of uniform distribution (min,max) and probability of error p, different levels of “artificial” error can be introduced. Thus it allows to investigate the power of tests for random variate generators.
通过不同的宽度均匀分布（min，max）和错误的概率p，不同层次的“人造”的错误可以推出。因此，它允许调查随机变量产生的力量测试。
值----------Value----------
A vector of random variates from the perturbed distribution is returned.
返回一个向量的扰动分布的随机变数。
（作者）----------Author(s)----------
Sougata Chaudhuri <a href="mailto:sgtchaudhuri@gmail.com">sgtchaudhuri@gmail.com</a>,
Josef Leydold <a href="mailto:josef.leydold@wu.ac.at">josef.leydold@wu.ac.at</a>
实例----------Examples----------
## Generating random sample with default settings[＃生成随机抽样使用默认设置]
x <- pertadd(n=1000)
y <- pertsub(n=1000)
## Generating random sample, with parent distribution as exponential.[＃生成随机抽样，与父分布指数。]
x <- pertadd(n=1000, rdist=rexp, rate=2, min=2, max=3, p=0.005)
y <- pertsub(n=1000, rdist=rexp, rate=2, min=2, max=3, p=0.005)
## Conducting chi-square test on random variates generated from function[＃产生的随机变数，从功能上进行卡方检验]
## pertsub with parent distribution as exponential.[＃pertsub作为指数中的分布与父母。]
ft <- rvgt.ftable(n=1e4,rep=10,
rdist=function(n){pertsub(n,rdist=rexp,p=0.1)},
qdist=qexp,breaks=1001)
plot(ft)
rvgt.chisq(ft)
## Conducting chi-square test on random variates generated from function[＃产生的随机变数，从功能上进行卡方检验]
## pertadd with parent distribution as Weibull,shape=1,scale=2.[＃pertadd与家长分布Weibull分布，形状= 1，规模= 2。]
ft <- rvgt.ftable(n=1e4,rep=10,
rdist=function(n,...){pertadd(n,rdist=rweibull,...,p=0.05)},
qdist=qweibull,shape=1,scale=2)
plot(ft)
rvgt.chisq(ft)
转载请注明:出自 生物统计家园网(http://www.biostatistic.net)。
注：
注1：为了方便大家学习，本文档为生物统计家园网机器人LoveR翻译而成，仅供个人R语言学习参考使用，生物统计家园保留版权。
注2：由于是机器人自动翻译，难免有不准确之处，使用时仔细对照中、英文内容进行反复理解，可以帮助R语言的学习。
注3：如遇到不准确之处，请在本贴的后面进行回帖，我们会逐渐进行修订。
|
发表于 2012-9-29 00:01:22
