请教一个关于bootstrap自助法的一个问题 - 经管之家

› 论坛 › 数据科学与人工智能 › 数据分析与数据科学 › R语言论坛

请教一个关于bootstrap自助法的一个问题

2226

4

收藏 2018-05-13

rsq <- function(formula, data, indices) {
d<-data[indices,]
  fit <- lm(formula, data=d)
  return(summary(fit)$r.square)
}

library(boot)
set.seed(1234)
results <- boot(data=mtcars, statistic=rsq,
            R=1000, formula=mpg~wt+disp)

这段代码里的“ d<-data[indices,]”是什么意思？是必须的吗？

二维码

扫码加我拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

全部回复

2018-5-13 14:58:20

d为data的indices行
indices为输入参数

二维码

扫码加我拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

2018-5-18 12:47:33

这里data是一个矩阵，然后对矩阵的每一行进行回归分析，最后rsq函数给出的结果是线性模型r2。要是我理解没错的话，最后bootstrap会给你r2的置信区间。

二维码

扫码加我拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

2018-5-22 20:16:33

xwan288 发表于 2018-5-13 14:58
d为data的indices行
indices为输入参数

谢谢，我是说没看到他给rsq函数的indices赋值啊？

二维码

扫码加我拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

2019-11-1 10:49:45

哈哈哈，我也不明白，请问楼主搞懂了吗？

二维码

扫码加我拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

相关推荐

栏目导航

热门文章

推荐文章

扫码加好友，拉您进群

各岗位、行业、专业交流群