Departments {deaR}

Data: Tomkins and Green (1988).

Description

Data from 20 University accounting departments in the UK.

Usage

data("Departments")

Format

Data frame with 20 rows and 11 columns. Definition of inputs (X) and outputs (Y):

x1 = Staff

Average Full Time Academic Staff 82/3-84/5)

x2 = Salaries

1984-5 Salaries Academics and Related (in pounds))

x3 = Other_Exp

1984-5 Other Expenses (in pounds)

y1 = Undergrad

Average Number Undergraduates 82/3-84/5

y2 = Research_post

Research Postgraduates

y3 = Taught_post

Taught Postgraduates

y4 = Res_co_income

Research council income (in pounds)

y5 = Other_res_income

Other research income (in pounds)

y6 = Other_income

Other income (in pounds)

y7 = Publications

Number of publications

Author(s)

Vicente Coll-Serrano ([e-mail]). Quantitative Methods for Measuring Culture (MC2). Applied Economics.

Vicente Bolos ([e-mail]). Department of Business Mathematics

Rafael Benitez ([e-mail]). Department of Business Mathematics

University of Valencia (Spain)

Source

Tomkins, C.; Green, R. (1988). "An Experiment in the Use of Data Envelopment Analysis for Evaluating the Efficiency of UK University Departments of Accounting", Financial Accountability and Management, 4(2), 147-164. doi:10.1111/j.1468-0408.1988.tb00296.x

See Also

make_deadata, model_basic

Examples

# Example.
# Replication of results DEA1 in Tomkins and Green (1988)
data("Departments")
# Calculate Total income
Departments$Total_income <- Departments[, 5] + Departments[, 6] + Departments[, 7]
data_example <- make_deadata(Departments,
                             inputs = 9,
                             outputs = c(2, 3, 4, 12))
result <- model_basic(data_example,
                      orientation = "io",
                      rts = "crs")
efficiencies(result) # Table 3 (p.156)
references(result) # Table 3 (p.157)