commonlist: commonlist
In n8thangreen/HESmanip: Hospital length of stay data preprocessing and analysis

Produces an ordered list by frequency.

1	commonlist(group, cut = 20, plot = FALSE)

`group`
`cut`	frequency cut-off value
`plot`

##---- 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 (group, cut = 20, plot = FALSE) 
{
    x <- as.data.frame(table(group))
    x <- data.frame(x, prop = x$Freq/sum(x$Freq))
    if (plot) {
        plot(x$Var1[x$Freq > cut], x$Freq[x$Freq > cut], las = 3)
    }
    x[x$Freq > cut, ][order(x[x$Freq > cut, "Freq"], decreasing = TRUE), 
        ]
  }