\begin{Schunk}
\begin{Sinput}
 merge(x = dat1, y = dat2, by = "Company", all = FALSE)
\end{Sinput}
\begin{Soutput}
  Company Earnings    Region
1       A   126345   Midwest
2       B   492012 Southeast
3       C   234512      West
\end{Soutput}
\end{Schunk}
