## ----include = FALSE----------------------------------------------------------
knitr::opts_chunk$set(
  collapse = TRUE,
  comment = "#>"
)

## -----------------------------------------------------------------------------
library(panelbuild)

## -----------------------------------------------------------------------------
data(example_panel)

example_panel

## -----------------------------------------------------------------------------
audit_panel(example_panel, id = id, time = year)

## -----------------------------------------------------------------------------
duplicate_summary(example_panel, id = id, time = year)

## -----------------------------------------------------------------------------
gap_summary(example_panel, id = id, time = year)

## -----------------------------------------------------------------------------
flag_panel_issues(example_panel, id = id, time = year)

## -----------------------------------------------------------------------------
example_panel_unique <- example_panel |>
  dplyr::distinct(id, year, .keep_all = TRUE)

complete_panel(example_panel_unique, id = id, time = year)

## ----eval = FALSE-------------------------------------------------------------
#  library(panelbuild)
#  
#  audit_panel(my_data, id = unit_id, time = year)
#  
#  duplicate_summary(my_data, id = unit_id, time = year)
#  
#  gap_summary(my_data, id = unit_id, time = year)
#  
#  clean_data <- my_data |>
#    dplyr::distinct(unit_id, year, .keep_all = TRUE)
#  
#  complete_panel(clean_data, id = unit_id, time = year)