hpcs-17-subord

commit 7d1b914aa319406c8513d365d5976201dbb8cf4d
parent de73ca1bfaedeba52b50342e5fed351fc8f54fdd
Author: Ivan Gankevich <igankevich@ya.ru>
Date:   Fri, 24 Mar 2017 12:21:28 +0300

Delete obsolete scripts.

Diffstat:
R/graph-scalability-virt.R
 | 
44
--------------------------------------------
R/graph-scalability.R
 | 
43
-------------------------------------------

2 files changed, 0 insertions(+), 87 deletions(-)
diff --git a/R/graph-scalability-virt.R b/R/graph-scalability-virt.R
@@ -1,44 +0,0 @@
-#!/usr/bin/env Rscript
-
-args <- commandArgs(trailingOnly=TRUE)
-if (length(args) < 3) {
-	stop("USAGE: ./script DIRWITH DIRWITHOUT OUTFILE")
-}
-
-source(file.path("R", "common.R"))
-
-log1 <- load_log_file_as_data_frame(args[[1]])
-log2 <- load_log_file_as_data_frame(args[[2]])
-outfile <- args[[3]]
-
-print(log1)
-print(log2)
-
-pdf(
-	file=outfile,
-	width=3,
-	height=2,
-	pointsize=7
-)
-
-x1 <- subord.colRange(log1)
-x2 <- subord.colRange(log2)
-y1 <- colMeans(log1) * 1e-3
-y2 <- colMeans(log2) * 1e-3
-
-print(x2)
-
-plot.new()
-plot.window(
-	xlim=range(c(x1,x2)),
-#	ylim=range(c(y1,y2))
-	ylim=c(0, 2)
-)
-axis(1, at=x2, labels=as.numeric(colnames(log2)))
-axis(2)
-box()
-print(y2)
-lines(x1, y1/y2, lty="solid")
-#lines(x1, y1, lty="solid")
-#lines(x2, y2, lty="dashed")
-title(xlab="No. of nodes", ylab="y")
diff --git a/R/graph-scalability.R b/R/graph-scalability.R
@@ -1,43 +0,0 @@
-#!/usr/bin/env Rscript
-
-args <- commandArgs(trailingOnly=TRUE)
-if (length(args) < 3) {
-	stop("USAGE: ./script DIRWITH DIRWITHOUT OUTFILE")
-}
-
-source(file.path("R", "common.R"))
-
-log1 <- load_log_file_as_data_frame(args[[1]])
-log2 <- load_log_file_as_data_frame(args[[2]])
-outfile <- args[[3]]
-
-print(log1)
-print(log2)
-
-pdf(
-	file=outfile,
-	width=3,
-	height=2,
-	pointsize=7
-)
-
-x1 <- subord.colRange(log1)
-x2 <- subord.colRange(log2)
-y1 <- colMeans(log1) * 1e-3
-y2 <- colMeans(log2) * 1e-3
-
-plot.new()
-plot.window(
-	xlim=range(c(x1,x2)),
-	ylim=range(y1/y2)
-#	ylim=c(0, 2)
-)
-axis(1, at=x1, labels=as.numeric(colnames(log1)))
-axis(2)
-box()
-print(y1/y2)
-lines(x1, y1/y2, lty="solid")
-#points(x1, y1, lty="solid")
-#points(x2, y2, lty="dashed")
-title(xlab="No. of nodes", ylab="Running time ratio")
-