noiris: Data sets

#' University Lecture/Instructor Evaluations by Students at ETH
#'
#' @description University lecture evaluations by students at ETH Zurich,
#'   anonymized for privacy protection. This is an interesting “medium” sized
#'   example of a partially nested mixed effect model.
#'
#' @format A data frame with 73421 observations on the following 7 variables.
#' \describe{
#'   \item{student_id}{a factor with levels 1:2972 denoting individual
#'   students.}
#'   \item{instructor_id}{a factor with 1128 levels from 1:2160, denoting
#'   individual professors or lecturers.}
#'   \item{student_age}{an ordered factor with levels 2 < 4 < 6 < 8, denoting
#'   student's 'age' measured in the semester number the student has been
#'   enrolled.}
#'   \item{lecture_age}{an ordered factor with 6 levels, 1 < 2 < ... < 6,
#'   measuring how many semesters back the lecture rated had taken place.}
#'   \item{lecture_age_num}{Same but as numeric.}
#'   \item{service}{a binary factor with levels 'main' and 'service'; a lecture
#'   is a 'service', if held for a different department than the lecturer's main
#'   one.}
#'   \item{department}{a factor with 14 levels from 1:15, using a random code
#'   for the department of the lecture.}
#'   \item{rating}{a numeric vector of ratings of lectures by the students,
#'   using the discrete scale 1:5, with meanings of 'poor' to 'very good'.}
#'   }
#'
#' @details
#' This data is directly imported from the lme4 package.  Column names have been
#' changed to be more discernable, and possibly altered to have meaningful
#' labels. Each observation is one student's rating for a specific lecture (of
#' one lecturer, during one semester in the past). The main goal of the survey
#' is to find 'the best liked prof', according to the lectures given.
#' Statistical analysis of such data has been the basis for a (student) jury
#' selecting the final winners.
#'
#' The present data set has been anonymized and slightly simplified on purpose.
#'
#' @seealso \code{\link[lme4]{InstEval}}
#' @examples
#' library(noiris)
#' str(instructor_evaluations)
#'
#' head(instructor_evaluations, 16)
"instructor_evaluations"