add parse scripts
[utp-swift.git] / parse / r_parse_cp.R
1 args <- commandArgs(trailingOnly=TRUE)
2
3 source_file <- args[1]
4 output_file <- args[2]
5
6 cpu_table <- read.table(source_file, header=T)
7
8 cpu_perc <- cpu_table$CPU
9
10 cpu_perc
11
12 pdf(file=output_file)
13 plot(cpu_perc, type="o", col="red", xlab="Time (s)", ylab="CPU Usage (%)");
14 dev.off()