R/GH.X.R

In FedIRT: Federated Item Response Theory Models

GH.X = function(q = 21, lower_bound = -3, upper_bound = 3) {
  level_diff = (upper_bound - lower_bound) / (q - 1)
  X = as.matrix(as.numeric(map(1:q, function(k) {
    index = (lower_bound + (k - 1) * level_diff)
    return(index)
  })))
  return(X)

}