diff options
| author | Kumar Damani <kumar.damani@mail.utoronto.ca> | 2018-11-24 02:32:28 +0000 |
|---|---|---|
| committer | Kumar Damani <kumar.damani@mail.utoronto.ca> | 2018-11-24 02:32:28 +0000 |
| commit | c5b7f3889008864dc684910040d077b84cac95d8 (patch) | |
| tree | c67224b34171d5b31b8f5aaefedd081bd421683f /code/perflow/flow_interarrival_all.R | |
| parent | 1aafb89d85b615a5ef11bf0eadbd771dd86bfb0a (diff) | |
updated interarrive plot and script
Diffstat (limited to 'code/perflow/flow_interarrival_all.R')
| -rw-r--r-- | code/perflow/flow_interarrival_all.R | 9 |
1 files changed, 8 insertions, 1 deletions
diff --git a/code/perflow/flow_interarrival_all.R b/code/perflow/flow_interarrival_all.R index a10e7a2..534e781 100644 --- a/code/perflow/flow_interarrival_all.R +++ b/code/perflow/flow_interarrival_all.R @@ -1,10 +1,17 @@ +options("scipen" = 10) + all_times = read.csv(file="../../data/perflow/all_arrivel_time.csv", header=TRUE, sep=",") +tcp_times = read.csv(file="../../data/perflow/tcp_arrivel_time.csv", header=TRUE, sep=",") udp_times = read.csv(file="../../data/perflow/udp_arrivel_time.csv", header=TRUE, sep=",") all_cdf = ecdf(all_times$time) +tcp_cdf = ecdf(tcp_times$time) udp_cdf = ecdf(udp_times$time) -plot(all_cdf, col="red", main="CDF of inter-arrival times of ALL flows", xlab="time (s)", ylab="probability", xlim=c(0,0.1), ylim=c(0,1)) +plot(all_cdf, col="red", main="CDF of inter-arrival times of ALL, TCP, and UDP flows", xlab="time (s)", ylab="probability", xlim=c(0,0.001), ylim=c(0,1)) +lines(tcp_cdf, col="blue") +lines(udp_cdf, col="green") +legend('bottomright', legend=c("ALL", "TCP", "UDP"), col=c("red", "blue", "green"), lty=1) dev.print(png, '../../plots/perflow/interarrival_all.png', width=500) #quit() |