Initiated code for ROSALI and residuals DIF analysis

main
Corentin Choisy 9 months ago
parent 7454fa1295
commit aa1e5af1e3

@ -1,4 +1,3 @@
points(y=res.null3$true.value.in.ci.p,x=rep(2,nrow(res.null3)),col='#053305',pch=3)
res.null3 <- res.dat.temp[res.dat.temp$dif.size==0.3,] res.null3 <- res.dat.temp[res.dat.temp$dif.size==0.3,]
points(y=res.null3$true.value.in.ci.p,x=rep(3,nrow(res.null3)),col='#053305',pch=3) points(y=res.null3$true.value.in.ci.p,x=rep(3,nrow(res.null3)),col='#053305',pch=3)
# J=7 / 2 DIF # J=7 / 2 DIF
@ -510,3 +509,4 @@ legend=c("Scenario A",
"Scenario 3-4 / B-D", "Scenario 3-4 / B-D",
"Scenario 1-2 / C-E", "Scenario 1-2 / C-E",
"Scenario 3-4 / C-E"),cex=0.7) "Scenario 3-4 / C-E"),cex=0.7)
View(res.dat.dif[res.dat.dif$scenario=="20A",])

File diff suppressed because it is too large Load Diff

File diff suppressed because it is too large Load Diff
Loading…
Cancel
Save