update data files

jan-imbi · Sep 25, 2023 · b507e26 · b507e26
1 parent 807c52a
commit b507e26
Show file tree

Hide file tree

Showing 5 changed files with 4 additions and 4 deletions.
diff --git a/data/code/graphics.R b/data/code/graphics.R
@@ -120,10 +120,10 @@ f_p_reject <- adestr:::plot_rejection_regions(
   Normal(two_armed = FALSE), designad, 0, 1, subdivisions = 200L)
 f_p <- ggarrange(f_p_sw, f_p_ml, f_p_lr, f_p_st, f_p_np, f_p_reject,  ncol = 2, nrow = 3,
                  legend.grob = gridExtra::gtable_rbind(get_legend(f_p_reject), get_legend(f_p_sw)))
-Cairo::CairoTIFF("data/f_p.tiff", width = 900, height = 700)
+Cairo::CairoTIFF("data/f_p.tiff", width = 900*3.5*2, height = 700*3.5*2, res = 310*2)
 f_p
 dev.off()
-Cairo::CairoPNG("data/f_p.png", width = 900, height = 700)
+Cairo::CairoPNG("data/f_p.png", width = 900*3.5*2, height = 700*3.5*2, res = 310*2)
 f_p
 dev.off()
 
@@ -139,10 +139,10 @@ f_p_reject <- adestr:::plot_rejection_regions(
   Normal(two_armed = FALSE), designgs, 0, 1, subdivisions = 200L)
 f_p <- ggarrange(f_p_sw, f_p_ml, f_p_lr, f_p_st, f_p_np, f_p_reject,  ncol = 2, nrow = 3,
                  legend.grob = gridExtra::gtable_rbind(get_legend(f_p_reject), get_legend(f_p_sw)))
-Cairo::CairoTIFF("data/f_p_gs.tiff", width = 900, height = 700)
+Cairo::CairoTIFF("data/f_p_gs.tiff", width = 900*3.5*2, height = 700*3.5*2, res = 310*2)
 f_p
 dev.off()
-Cairo::CairoPNG("data/f_p_gs.png", width = 900, height = 700)
+Cairo::CairoPNG("data/f_p_gs.png", width = 900*3.5*2, height = 700*3.5*2, res = 310*2)
 f_p
 dev.off()
 

diff --git a/data/f_p.png b/data/f_p.png
diff --git a/data/f_p.tiff b/data/f_p.tiff
diff --git a/data/f_p_gs.png b/data/f_p_gs.png
diff --git a/data/f_p_gs.tiff b/data/f_p_gs.tiff