results.decay.tcl

来自「采用蚂蚁算法实现ad hoc网络路由协议,平台为ns2」· TCL 代码 · 共 46 行

source gatherresults.tcl

source swarmsimulations.tcl

set metric_calculators {pdr}

set seriesparameters { 
	"\$val(routingprotocol)"
	"\$val(maxspeed)"
	}
set keytitle "Routing Protocol / Max Speed"

set plotparameters { 
	"\$val(probabilityHistory)"
	}
set plotparamnames {
	"history"
	}

set runparameters { 
	"\$val(seed)"
	"\$val(scenario)"
	"\$val(maxspeed)"
	"\$val(decayPerSecond)"
	}

set measuredmetrics {
	"\$pdr(tot)"
	"\$pdr(cost)"
	}
set metricnames {
	"Delivery Ratio"
	"Delivery Cost"
}

set confidenceInterval 0.95

set statsFileName "decay"

set glob "log/decay-*"

set plot_files 0
set plot_errors 1

gatherAndPlot