X-Git-Url: https://bilbo.iut-bm.univ-fcomte.fr/and/gitweb/loba-papers.git/blobdiff_plain/e8a50f36912db421cea4c11f504ea9d253a9430f..489cb553d50ebc655d7bb377a73ec6799b4353e3:/loba-besteffort/data/script.r?ds=inline

diff --git a/loba-besteffort/data/script.r b/loba-besteffort/data/script.r
index ec331ea..236cfd0 100644
--- a/loba-besteffort/data/script.r
+++ b/loba-besteffort/data/script.r
@@ -193,11 +193,13 @@ for (m in c("R", "I")) {
       for (t in c("line", "torus", "hcube")) {
         for (p in c("grid", "cluster")) {
           message(sprintf(">>> Drawing: %s%s / %s / %s / %s", m, d, r, p, t))
-          pdf(file=sprintf("graphs/%s%s-%s-%s-%s.pdf", m, d, r, p, t))
+          filename <- sprintf("graphs/%s%s-%s-%s-%s.pdf", m, d, r, p, t)
+          pdf(file=filename)
           draw2(#subset(ds, grepl("[lt]_plain", Algo)),
                 draw_mode=m, draw_distrib=d, draw_ratio=r,
                 draw_topo=t, draw_platform=p)
           dev.off()
+          embedFonts(file=filename, options="-dPDFSETTINGS=/prepress")
         }
       }
     }