### R代码来自Vignette Source'Vignette.rnw'###############################################################################################################################################，“ data.rda”，package =“ inpower”）##################################################################################################################################] beta < - data [，“ beta”] pow < - data [，“电源”] ############################################################## ###代码块数字5：call1 ##########################################################sample.size = seq（25000,125000，by = 25000），signif.lvl = 10^（ - 7），tgv = 0.8，k = seq（25,125，by = 25））############################################################################################ binary.outcome=FALSE, sample.size=seq(25000,125000,by=25000), signif.lvl=10^(-7), k=seq(25,125,by=25)) ################################################### ### code chunk number 7: call3 ################################################### INPower(MAFs, betas, pow, span=0.5, binary.outcome=FALSE, sample.size=seq(25000,125000,by=25000), signif.lvl=10^(-7), multi.stage.option=list(al=5*10^(-5), pi=0.3), tgv=0.8 , k=seq(25,125,by=25)) ################################################### ### code chunk number 8: sessionInfo ################################################### sessionInfo()