\begin{Schunk}
\begin{Sinput}
 merge(x = dat1, y = dat2, by = "Company", all.x = TRUE)
\end{Sinput}
\begin{Soutput}
  Company Earnings    Region
1       A   126345   Midwest
2       B   492012 Southeast
3       C   234512      West
4       D   -28124      <NA>
5       E   128675      <NA>
\end{Soutput}
\end{Schunk}
