Data Envelope Analysis nedir?

data<-read.csv("nbaplayers1718.csv") X=data[0:486,c("G","MP","PER","WS","VORP")] y2 <- as.numeric(gsub('[$,]', '', data$
di = dea.robust(X=X, Y=y2, model="input", RTS="variable")
hatir=di$theta_hat_hat which(hatir==min(hatir)) data[70,c("Player.Name")]
hatir=di$theta_hat_hat which(hatir==max(hatir)) data[323,c("Player.Name")]



Computer Engineer,Sociologist, CSE Master Student

Love podcasts or audiobooks? Learn on the go with our new app.

Get the Medium app

A button that says 'Download on the App Store', and if clicked it will lead you to the iOS App store
A button that says 'Get it on, Google Play', and if clicked it will lead you to the Google Play store