# NOT RUN {
#D matrix containing only the minimum spanning tree
D <- matrix(c(0,3,NA,3,NA,NA,
3,0,1,NA,NA,NA,
NA,1,0,NA,NA,NA,
3,NA,NA,0,1,NA,
NA,NA,NA,1,0,1,
NA,NA,NA,NA,1,0),byrow=TRUE, nrow=6)
edmc(D, method="grs", d=3)
# }
Run the code above in your browser using DataLab