Defines functions fill_missing

Documented in fill_missing

#' Fill missing
#' wrapper function to do check and call all fill_vector functions
#' @param x The vector to fill
#' @param min_known_n numeric value: the minimum number of not-missing values
#' @param min_known_p numeric value between 0 and 1: the minimum fraction of not-missing values
#' @param type the type of fill missing function to be called
fill_missing <- function(x, min_known_n = NULL, min_known_p = NULL, type) {

    stopifnot(type %in% c("last",

    ## Check if missing values can and should be filled
    if(!check_some_missing(x)) {

    ## Create vector without mising values
    x_na_omit <- stats::na.omit(x)

    ## Check if the minimum known n and percentage criteria are matched
    if(!check_min_known(x, x_na_omit, min_known_n, min_known_p)) {

    ## Call the fill_vector function, depending on the given type argument
    if (type == "last"){
        return(fill_vector_last(x, x_na_omit))
    } else if (type == "min") {
        return(fill_vector_min(x, x_na_omit))
    } else if (type == "max") {
        return(fill_vector_max(x, x_na_omit))
    } else if (type == "strict") {
        return(fill_vector_strict(x, x_na_omit))
    } else if (type == "previous") {
    } else if (type == "interval") {


Try the fillr package in your browser

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

fillr documentation built on March 26, 2020, 7:23 p.m.