我正在使用bootstrap创建一个新的示例,以生成一个具有年龄和性别控制的控制组。每个变量都有2到8个值之间的不同长度的数字
control_40_50_HRV_female2 <- abs(parametric_bootstrap_boot2(control_40_50_HRV_female_SDNN))
control_50_60_HRV_male2 <- abs(parametric_bootstrap_boot2(control_50_60_HRV_male_SDNN))
control_50_60_HRV_female2 <-abs(parametric_bootstrap_boot2(control_50_60_HRV_female_SDNN))
control_60_70_HRV_male2 <- abs(parametric_bootstrap_boot2(control_60_70_HRV_male_SDNN))
control_60_70_HRV_female2 <-abs(parametric_bootstrap_boot2(control_60_70_HRV_female_SDNN))
control_70_80_HRV_male2 <-abs(parametric_bootstrap_boot2(control_70_80_HRV_male_SDNN))如何将它们全部放入一组(一个变量)?这样我就可以开始做t检验了?我希望这是清楚的。
下面是变量的输出示例
> control_40_50_HRV_female2
[1] 29.08388 102.49869
> control_50_60_HRV_male2
[1] 36.81686 127.47986 13.40681
> control_50_60_HRV_female2
[1] 25.50313
> control_60_70_HRV_male2
[1] 39.93050 140.75967 13.89545 316.45988 158.91477
> control_60_70_HRV_female2
[1] 26.27908 106.40483当我运行此命令时
out <- stack(mget(ls(pattern = '^control_\\d{2}_\\d{2}_\\w+_')))[2:1]
dim(out)我明白了..。这是我从脚本开头创建的所有变量的列表。
> dim(out)
[1] 96683 2
> head(out)
ind values
1 control_40_50_HRV_female_BPM 63.48
2 control_40_50_HRV_female_BPM 52.67
3 control_40_50_HRV_female_BPM 88.92
4 control_40_50_HRV_female_BPM 69.04
5 control_40_50_HRV_female_BPM 53.46
6 control_40_50_HRV_female_BPM 63.64虽然我只需要这些变量的列表control_40_50_HRV_female2,control_50_60_HRV_male2 ....control_70_80_HRV_male2
发布于 2020-12-03 05:20:43
我们可以使用mget将“控制”对象的值放入list中,然后将其stack到两列的data.frame中
out <- stack(mget(ls(pattern = '^control_\\d{2}_\\d{2}_\\w+_')))[2:1]
head(out)
# ind values
#1 control_40_50_HRV_female2 29.08388
#2 control_40_50_HRV_female2 102.49869
#3 control_50_60_HRV_female2 25.50313
#4 control_50_60_HRV_male2 36.81686
#5 control_50_60_HRV_male2 127.47986
#6 control_50_60_HRV_male2 13.40681https://stackoverflow.com/questions/65116291
复制相似问题