<td>8 Mbit/s up/down</td>
<td><a href="test-scenario-pre-post-nop/test-scenario-pre-post-nop-dlspeed-percent.png">dlspeed vs percent</a>; <a href="test-scenario-pre-post-nop/test-scenario-pre-post-nop-dlspeed-time.png">dlspeed vs time</a></td>
</tr>
+ <tr>
+ <td>scenario-pre-post-nop-ul</td>
+ <td>1</td>
+ <td>1</td>
+ <td>8 Mbit/s up only</td>
+ <td><a href="test-scenario-pre-post-nop-ul/test-scenario-pre-post-nop-dlspeed-percent.png">dlspeed vs percent</a>; <a href="test-scenario-pre-post-nop-ul/test-scenario-pre-post-nop-dlspeed-time.png">dlspeed vs time</a></td>
+ </tr>
+ <tr>
+ <td>scenario-pre-post-nop-many</td>
+ <td>1</td>
+ <td>1</td>
+ <td>8 Mbit/s up only</td>
+ <td><a href="test-scenario-pre-post-nop-many/test-scenario-pre-post-nop-dlspeed-percent.png">dlspeed vs percent</a>; <a href="test-scenario-pre-post-nop-many/test-scenario-pre-post-nop-dlspeed-time.png">dlspeed vs time</a></td>
+ </tr>
</tbody>
</table>
</div>
# read data from the data file
seeder=read.table(paste(target_folder, "p2p-next-03-101.log.data", sep="/"), header=T, sep=" ")
-leecher=read.table(paste(target_folder, "p2p-next-03-103.log.data", sep="/"), header=T, sep=" ")
+leecher=read.table(paste(target_folder, "p2p-next-03-102.log.data", sep="/"), header=T, sep=" ")
# transform KB/s to Mbit/s
scale_y_continuous("Download speed (Mbit/s)", limits=c(0, 8), breaks=seq(0, 8, 0.5)) +
coord_cartesian() +
scale_colour_manual("Legend") +
-opts(title=paste(campaign_name, "scenario-pre-post-nop: a test swarm (1 Seeder, 1 Leecher), all peers have an 8 Mbit/s BW", sep="\n"))
+opts(title=paste(campaign_name, "test-scenario-pre-post-nop: a test swarm (1 Seeder, 1 Leecher), all peers have an 8 Mbit/s BW", sep="\n"))
# plot data as an eps file
-postscript(paste(target_folder, "scenario-pre-post-nop-dlspeed-percent.eps", sep="/"))
+postscript(paste(target_folder, "test-scenario-pre-post-nop-dlspeed-percent.eps", sep="/"))
print(p)
dev.off()
# plot data as an png file
-png(paste(target_folder, "scenario-pre-post-nop-dlspeed-percent.png", sep="/"), width = 1280, height = 800)
+png(paste(target_folder, "test-scenario-pre-post-nop-dlspeed-percent.png", sep="/"), width = 1280, height = 800)
print(p)
dev.off()
scale_y_continuous("Download speed (Mbit/s)", limits=c(0, 8), breaks=seq(0, 8, 0.5)) +
coord_cartesian() +
scale_colour_manual("Legend") +
-opts(title=paste(campaign_name, "scenario-pre-post-nop: a test swarm (1 Seeder, 1 Leecher), all peers have an 8 Mbit/s BW", sep="\n"))
+opts(title=paste(campaign_name, "test-scenario-pre-post-nop: a test swarm (1 Seeder, 1 Leecher), all peers have an 8 Mbit/s BW", sep="\n"))
# plot data as an eps file
-postscript(paste(target_folder, "scenario-pre-post-nop-dlspeed-time.eps", sep="/"))
+postscript(paste(target_folder, "test-scenario-pre-post-nop-dlspeed-time.eps", sep="/"))
print(p)
dev.off()
# plot data as an png file
-png(paste(target_folder, "scenario-pre-post-nop-dlspeed-time.png", sep="/"), width = 1280, height = 800)
+png(paste(target_folder, "test-scenario-pre-post-nop-dlspeed-time.png", sep="/"), width = 1280, height = 800)
print(p)
dev.off()