duplicates.R
In scrutiny: Error Detection in Science

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

## ----setup--------------------------------------------------------------------
library(scrutiny)

## -----------------------------------------------------------------------------
pigs4

## -----------------------------------------------------------------------------
pigs4 %>% 
  duplicate_count()

## -----------------------------------------------------------------------------
pigs4 %>% 
    duplicate_count() %>% 
    audit()

## -----------------------------------------------------------------------------
pigs4 %>% 
  duplicate_count_colpair()

## -----------------------------------------------------------------------------
pigs4 %>% 
  duplicate_count_colpair() %>% 
  audit()

## -----------------------------------------------------------------------------
pigs4 %>% 
    duplicate_tally()

## -----------------------------------------------------------------------------
pigs4 %>% 
    duplicate_tally() %>% 
    audit()