## ----message=F, warning=F-----------------------------------------------------
library(framecleaner)
library(dplyr)

## -----------------------------------------------------------------------------
tibble::tibble(
  date = c("20190101", "20190305", "20201012"),
  numeric_val = c(1, NA, 5),
  char_val = c("", "    val ", "-")
) -> sample_table

sample_table

## -----------------------------------------------------------------------------
sample_table %>% 
  make_na()

## -----------------------------------------------------------------------------
sample_table %>% 
  remove_whitespace()

## -----------------------------------------------------------------------------
sample_table %>% 
  set_date()

## -----------------------------------------------------------------------------
sample_table %>% 
  relocate_all()

## -----------------------------------------------------------------------------
sample_table %>% 
  clean_frame()

## -----------------------------------------------------------------------------
sample_table %>% 
  fill_na()