% Generated by roxygen2: do not edit by hand
% Please edit documentation in R/get_spouse.R
\name{match_spouse}
\alias{match_spouse}
\title{Interna function to match and extract a spouse from text}
\usage{
match_spouse(words, tags, physicist, physicist.position, spouse.position,
  annotation, people)
}
\arguments{
\item{words}{Tokens to match for}

\item{tags}{**Optional** POS tags to match for}

\item{physicist}{Name of the physicist for whos spouse we're looking}

\item{physicist.position}{Where to extract the physicist entity from}

\item{spouse.position}{Where to extract the spouse entity from}

\item{annotation}{Anootation object}

\item{people}{List to match found spouse against}
}
\value{
Spouse if found NA if not
}
\description{
Interna function to match and extract a spouse from text
}
\examples{
\dontrun{
# Bad example
spouse <- match_spouse("* marry * *", "* * * *", "Jules Aaron", c(1, 1), c(3, 4), entities)

spouses
}
}