# Example.
data("Golany_Roll_1989")
data_example <- make_deadata(datadea = Golany_Roll_1989,
dmus = 1,
inputs = 2:4,
outputs = 5:6)
result <- cross_efficiency(data_example,
orientation = "io",
selfapp = TRUE)
result$Arbitrary$cross_eff
result$Arbitrary$e
Run the code above in your browser using DataLab