rmAllButOne: Remove all but one patient record
In n8thangreen/HESmanip: Hospital length of stay data preprocessing and analysis

Description Usage Arguments Author(s) Examples

Remove all but one patient record to omit duplicates.

1	rmAllButOne(ind, subrows, total.data)

`ind`
`subrows`	row names of subset of rows of `total.data` on which to apply function.
`total.data`	Master data.frame of patient records

N Green

##---- Should be DIRECTLY executable !! ----
##-- ==>  Define data, use random,
##--	or do  help(data=index)  for the standard data sets.

## The function is currently defined as
function (ind, subrows, total.data) 
{
    ind.min <- min(which(ind[subrows]))
    ind[subrows] <- FALSE
    ind[subrows[ind.min]] <- TRUE
    total.data <- total.data[ind, ]
    total.data
  }