corentinchoisy/simul_these
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Corrected data generation bug for scenario 10B

Browse Source
This commit is contained in:
Corentin Choisy
2024-05-17 17:09:21 +02:00
parent c6afca9a3b
commit 413b10ae29
5 changed files with 10 additions and 10 deletions
Download Patch File Download Diff File Expand all files Collapse all files

12
RProject/Scripts/aggregation.R
View File

@ -1202,12 +1202,12 @@ res.dat[res.dat$dif.size!=0 & res.dat$nb.dif==0,]$nb.dif <- 1
res.dat.dif <- res.dat.dif %>%
relocate(method, .after = theoretical.power)
aa <- res.dat.dif[res.dat.dif$scenario=="10B",]
bb <- res.dat[res.dat$scenario=="10B",]
res.dat.dif[res.dat.dif$scenario=="10B",] <- bb
res.dat[res.dat$scenario=="10B",] <- aa
res.dat[res.dat$method=="PERFECT",]$method <- "NONE"
res.dat.dif[res.dat.dif$method=="NONE",]$method <- "PERFECT"
#aa <- res.dat.dif[res.dat.dif$scenario=="10B",]
#bb <- res.dat[res.dat$scenario=="10B",]
#res.dat.dif[res.dat.dif$scenario=="10B",] <- bb
#res.dat[res.dat$scenario=="10B",] <- aa
#res.dat[res.dat$method=="PERFECT",]$method <- "NONE"
#res.dat.dif[res.dat.dif$method=="NONE",]$method <- "PERFECT"
# Items dichotomiques