正在加载图片...
为0.115. 例3使用boot函数进行Bootstrap估计标准差在R中,包boot里的boot函 数可以进行Bootstrap估计.boot函数中的参数statistic是一个函数,用来返 回感兴趣的统计量值.这个函数必须至少有两个参数,其中第一个是数据,第二 个表示Bootstrap抽样中的指标向量,频率或者权重等.因此我们首先写一个 函数计算().用i=(i1,·,i)表示指标向量,则计算相关系数的程序为 TCode tau<-function(x,i){ x1<-x[1,] cor(x1[,1],xi[,2]) Code 然后我们就可以使用boot函数进行Bootstrap估计: library(boot) #for boot function obj <boot(data law,statistic tau,R 2000) Previous Next First Last Back Forward 9è0.115. ~3 ¶^bootºÍ?1BootstrapOIO 3R•, ùbootpbootº Íå±?1BootstrapO. boot ºÍ•ÎÍstatistic¥ òáºÍ, ^5à £a,⁄O˛ä. ˘áºÍ7Lñk¸áÎÍ, Ÿ•1òá¥Í‚, 1 áL´Bootstrap ƒ•çIï˛, ™«½ˆ­. œd·Çƒkòá ºÍOéθˆ(b) . ^i = (i1, · · · , in) L´çIï˛, KOéÉ'XÍßSè ↑Code tau<-function(x,i){ xi<-x[i,] cor(xi[,1],xi[,2]) } ↓Code ,￾·Ç“屶^bootºÍ?1BootstrapO: ↑Code library(boot) #for boot function obj <- boot(data = law, statistic = tau, R = 2000) Previous Next First Last Back Forward 9
<<向上翻页向下翻页>>
©2008-现在 cucdc.com 高等教育资讯网 版权所有