arma-thesis

commit 52032429f4bb06b854906a5f066bd7731d14eb0e
parent ebd0823b2723ca6bae7ab4cf2fed2c5669f05eb1
Author: Ivan Gankevich <igankevich@ya.ru>
Date:   Wed, 15 Nov 2017 15:18:02 +0300

Adjust event graphs.

Diffstat:
R/benchmarks.R
 | 
3
++-
arma-thesis-ru.org
 | 
9
+++------
arma-thesis.org
 | 
9
+++------

3 files changed, 8 insertions(+), 13 deletions(-)
diff --git a/R/benchmarks.R b/R/benchmarks.R
@@ -151,7 +151,8 @@ arma.plot_io_events <- function (names) {
         xs <- c(ev$t0, ev$t1)/1000/1000
     #		points(xs[[1]], ys[[1]], pch=19, cex=0.4)
     #		arrows(xs[[1]], ys[[1]], xs[[2]], ys[[2]], angle=10, length=0.05)
-        lines(xs, ys, lwd=3, col=c$color)
+        #lines(xs, ys, lwd=3, col=c$color)
+        points(xs, ys, col=c$color)
       }
     }
     axis(1, at=pretty(c(0,max_x)))
diff --git a/arma-thesis-ru.org b/arma-thesis-ru.org
@@ -2167,15 +2167,12 @@ arma.print_sync_vs_async_io(suffix_names, row_names, top_names)
 | Запись вывода в файл               | 0,28 | 2,34 |     10,95 | 0,00 | 0,00 |      0,00 |
 
 #+name: fig-arma-io-events
-#+header: :width 6 :height 7 :results output graphics
+#+header: :height 9 :results output graphics
 #+begin_src R :file build/arma-io-events-ru.pdf
 source(file.path("R", "benchmarks.R"))
 par(family="serif")
-names <- list(
-  xlab="Время, сек.",
-  ylab="Поток"
-)
-par(mfrow=c(3, 1), mar=c(4,4,4,0.5), family='serif')
+names <- list(xlab="Время, сек.", ylab="Поток")
+par(mfrow=c(3, 1), mar=c(4,4,4,0.5), family='serif', cex=1)
 arma.plot_io_events(names)
 #+end_src
 
diff --git a/arma-thesis.org b/arma-thesis.org
@@ -2104,14 +2104,11 @@ arma.print_sync_vs_async_io(suffix_names, row_names, top_names)
 | Write output to files            | 0.28 | 2.34 |     10.95 | 0.00 | 0.00 |      0.00 |
 
 #+name: fig-arma-io-events
-#+header: :width 6 :height 7 :results output graphics
+#+header: :height 9 :results output graphics
 #+begin_src R :file build/arma-io-events.pdf
 source(file.path("R", "benchmarks.R"))
-names <- list(
-  xlab="Time, s",
-  ylab="Thread"
-)
-par(mfrow=c(3, 1), mar=c(4,4,4,0.5), family='serif')
+names <- list(xlab="Time, s", ylab="Thread")
+par(mfrow=c(3, 1), mar=c(4,4,4,0.5), family='serif', cex=1)
 arma.plot_io_events(names)
 #+end_src