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

# build_rmd("vignettes/myrror.Rmd")

## ----setup--------------------------------------------------------------------
library(myrror)

## -----------------------------------------------------------------------------
survey_data

## -----------------------------------------------------------------------------
survey_data_2

## -----------------------------------------------------------------------------
all.equal(survey_data, survey_data_2)

## -----------------------------------------------------------------------------
myrror(survey_data, survey_data_2, by = c("country", "year"))

## -----------------------------------------------------------------------------
extract_diff_values()

## -----------------------------------------------------------------------------
extract_diff_values(survey_data, survey_data_2, by = c("country", "year"))

## -----------------------------------------------------------------------------
all.equal(survey_data, survey_data_4)

## -----------------------------------------------------------------------------
extract_diff_rows(survey_data, survey_data_4, by = c("country", "year"))