\begin{Schunk}
\begin{Sinput}
 reslt <- data.frame(address = cities, 
              cities = cities3, st.abb = stabbs, 
              st.name = stnames)
 head(reslt)
\end{Sinput}
\begin{Soutput}
                  address     cities st.abb       st.name
1            Dallas Texas     Dallas     TX         Texas
2         Denver Colorado     Denver     CO      Colorado
3            Austin Texas     Austin     TX         Texas
4            Salem Oregon      Salem     OR        Oregon
5     Salem Massachusetts      Salem     MA Massachusetts
6 California Pennsylvania California     PA  Pennsylvania
\end{Soutput}
\end{Schunk}
