R, аргументы функции, lapply

Question

Я новичок с R.

Я буду бороться с функциями.например:

data <- read.csv("outcome-of-care-measures.csv", colClasses = "character")[,c(2,7,11,17,23)]
  names(data)[3] = "rate"
  data[, 3] = suppressWarnings( as.numeric(data[, 3]) )
  num<- 1
  data = data[!is.na(data$rate),]

  splited = split(data, data$State)
  ans = lapply(splited, function(x, num) {
    # Order by Deaths and then HospitalName
    x = x[order(x$rate, x$Hospital.Name),]

    # Return
    return (x$Hospital.Name[num])
  }, 1)

  #Return data.frame with format
  print( data.frame(hospital=unlist(ans), state=names(ans)) )

приведенный выше код работает :) .. однако я не понимаю, на что ссылается x в моей функции.это относится к строке кадра данных splited?