Displaying 1 result from an estimated 1 matches for "linksum_".
Did you mean:
linkdump
2010 Nov 15
1
Aggregate on identical link attributes
...data
TNode<-c(1:20,21)
FNode<-c(rev(1:20),22)
Volume<-c(rep(100,20),200)
ClassCode=c(rep("Local",20),rep("Freeway",1))
#Create data frame with test data
EmmeData..<-data.frame(TNode=TNode,FNode=FNode,Volume=Volume,ClassCode=ClassCode)
#Create list to store results
LinkSum_<-list()
#Create vecotrs to establish loops
TNodes<-unique(EmmeData..$TNode)
FNodes<-unique(EmmeData..$FNode)
for(tn in TNodes){
for(fn in FNodes){
TF<-EmmeData..[EmmeData..$TNode==tn & EmmeData..$FNode==fn,]
FT<-EmmeData..[EmmeData..$TNode==fn &am...