### R代码从vignette源的vignette。Rnw ' ################################################### ### 代码块1号:开始 ################################################### 库(INPower ) ################################################### ### 2号代码块:数据文件 ################################################### 数据文件< -系统。文件(“sampleData”、“数据。rda”,包= " INPower ") ################################################### ### 代码块3号:加载数据 ################################################### 负载(外部)的数据 ################################################### ### 代码块数量4:单核苷酸多态性 ################################################### 加< -数据(,“加”)贝塔< -数据(“测试版”][战俘< -数据,“权力 "] ################################################### ### 代码块5号:call1 ################################################### INPower(加贝塔,战俘,跨度= 0.5,二进制文件。结果= FALSE, sample.size = seq(= 25000、125000、25000),signif.lvl = 10 ^ (7), tgv = 0.8, k = >(25125年= 25 )) ################################################### ### 代码块6号:call2 ################################################### INPower(加贝塔,战俘,跨度= 0.5,二进制文件。结果= FALSE, sample.size = seq(= 25000、125000、25000),signif.lvl = 10 ^ (7), k = >(25125年= 25 )) ################################################### ### 代码块7号:call3 ################################################### INPower(加贝塔,战俘,跨度= 0.5,二进制文件。结果= FALSE, sample.size = seq(= 25000、125000、25000),signif.lvl = 10 ^ (7), multi.stage.option =列表(al = 5 * 10 ^(5),π= 0.3),tgv = 0.8, k = >(25125年= 25 )) ################################################### ### 代码块8号:sessionInfo ################################################### sessionInfo ()