# Example. Replication of results in Kao and Liu (2003, p.152)
data_example <- make_deadata_fuzzy(Kao_Liu_2003,
dmus = 1,
inputs.mL = 2,
outputs.mL = 3:7,
outputs.dL = c(NA, NA, 8, NA, 10),
outputs.dR = c(NA, NA, 9, NA, 11))
result <- modelfuzzy_kaoliu(data_example,
kaoliu_modelname = "basic",
orientation = "oo",
rts = "vrs",
alpha = 0)
eff <- efficiencies(result)
eff
Run the code above in your browser using DataLab