\name{simulate_inter_data}
\alias{simulate_inter_data}
\alias{inter_example}
\title{Simulate an Intersectional Survey--Census Problem}
\usage{
simulate_inter_data(seed = 123, n = 500, areas = paste0("A", 1:6))

inter_example()
}
\arguments{
\item{seed}{Random-number seed.}
\item{n}{Survey sample size.}
\item{areas}{Distinct area labels.}
}
\value{
A list containing survey microdata, overlapping census margins, and the latent
full population table used to generate the data.
}
\description{
Create a reproducible problem with a binary unemployment outcome and partially
identified age-by-residence associations within area and sex groups.
}
\examples{
example_data <- inter_example()
names(example_data)
head(example_data$survey)
lapply(example_data$margins, head)
}
