# Calculation of Pareto-optimal resource allocation using MFPP package.
# Define a 3 by 3 upper traingular logic domain of a project structure.
# Specification of Logic Domain
DSM<-matrix(c(1,1,0,1,0,0,
0,1,0,0,0,0,
0,0,1,1,0,0,
0,0,0,1,0,0,
0,0,0,0,0,0,
0,0,0,0,0,0),nrow=6, byrow=TRUE)
# Specification of Time Domain
TD<-matrix(c(2,
3,
1,
4,
0,
0),nrow=6, byrow=TRUE)
# Specification of Resource Domain
RD<-matrix(c(4,2,
3,2,
5,1,
6,4,
0,0,
0,0),nrow=6, byrow=TRUE)
RES<-paretores(DSM,TD,RD)
RES
# Verify results
tpr(RES$SST,DSM,TD,RD)
Run the code above in your browser using DataLab