# NOT RUN {
data("PFT1981")
datadea <- read_data(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)
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab