R/rmProfiles.wprof.R

In parsec: Partial Orders in Socio-Economics

Defines functions rmProfiles.wprof

Documented in rmProfiles.wprof

rmProfiles.wprof <-
function(y, v, ...) {
    if (is.logical(v)) v <- which(v)
    if (is.character(v)) v <- which(rownames(y$profiles) %in% v)
    y$profiles <- y$profiles[-v,]
    y$freq <- y$freq[-v]
    return(y)
}

Try the parsec package in your browser