| cell_defn | R Documentation |
Take a dataset of hospital discharges, and assigns them to cells that meet a minimum threshold cell size.
cell_defn(data, min_size, layers, count = "count", expandLayers = FALSE)
data |
Dataset of discharges. |
min_size |
Minimize cell size. |
layers |
A list of lists. Each layer is a list of the variables on which observations will be allocated to cells. The layers should be ordered in decreasing refinement, so that observations not assigned to a cell meeting the minimum size threshold can be assigned by a more coarse layer. |
count |
Name of variable which indicates the number of admissions
represented by an observation. Default variable name is |
expandLayers |
logical; if only a single layer is given, setting this to TRUE will expand the layer to a set of layers where each layer drops the last variable in the list of the previous layer. |
If the variable count is not available, the function will assume that
each observation represents one admission, and a variable count will
be created in the output data frame to indicate this.
When assigning observations to cells in a given layer, this function only assigns observations that have not been previously assigned in a finer layer. That is, the function assigns observations without replacement. Assignment with replacement is currently not supported.
For more details see the example vignette by typing:
vignette("semipar_example", package = "healthcare.antitrust")
A list of data frames. The first component in the list, assigned,
is the original data frame, with observations assigned to cells, and
excluding observations that were not assigned. The assigned cells are
designated by the variable cell, and the layer number in
which the observation is assigned to the cell is given by the variable
cell_type. The second component of the list, unassigned, is a
data frame with the unassigned observations.
data(discharge_data, package = "healthcare.antitrust")
list1 <- c("drg","age","zip5")
layers <- list(list1)
th <- 15
discharge_data$count <- 1
outList <- cell_defn(discharge_data,th,layers)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.