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

## ----identity-data------------------------------------------------------------
library(rankingQ)
data("identity")

## ----main-data----------------------------------------------------------------
head(identity)

## ----anchor-data--------------------------------------------------------------
identity[
  ,
  c("household", "neighborhood", "city", "state", "anc_correct_identity")
] |>
  tail()