if (FALSE) {
data("PFT1981")
datadea <- make_deadata(PFT1981,
ni = 5,
no = 3)
# We find maximal friends of a cluster formed by the first 20 DMUs
result <- maximal_friends(datadea = datadea,
dmu_ref = 1:20)
}
Run the code above in your browser using DataLab