## load dataset with no weight value
data(dataEB)
temp = pcapdir(dataEB[,-c(3)])
momentRao(data.dir = temp$direst, pcap = temp$pcap)
##load dataset with weight value
data(dataEB)
temp = pcapdir(dataEB[,-c(3)])
momentRao(data.dir = temp$direst, pcap = temp$pcap)
Run the code above in your browser using DataLab