R/rakeonvar.logical.R

rakeonvar.logical <-
function(weighton, weightto, 
    weightvec) {
    weighton <- 2 - as.numeric(weighton)
    rakeonvar.numeric(weighton, weightto, weightvec)
}

Try the anesrake package in your browser

Any scripts or data that you put into this service are public.

anesrake documentation built on May 2, 2019, 1:42 p.m.