data("PFT1981")
datadea <- make_deadata(PFT1981,
ni = 5,
no = 3)
# We find a extreme efficient subset from a cluster formed by the first 20 DMUs
result <- extreme_efficient(datadea = datadea,
dmu_ref = 1:20)
Run the code above in your browser using DataLab