commutative.latex

\documentclass{article}
\usepackage{amsmath}
\usepackage{amsfonts}
\usepackage{amssymb}
\usepackage[all]{xy}
\usepackage[dvipdfmx]{graphicx}
\def\x1xn{x_1, x_2, \dotsc, x_n}
\begin{document}

\[
\xymatrix@M=8pt{
R \ar@{^{(}->}[r] \ar@{^{(}->}[d] & R\lbrack\x1xn\rbrack \ar@{^{(}->}[r] \ar@{^{(}->}[d] \ar@{^{(}->}[rd]^\phi & R(\x1xn) \ar[d]^{\rotatebox{90}{$\sim$}}_{\psi}\\
K \ar@{^{(}->}[r] & K\lbrack\x1xn\rbrack \ar@{^{(}->}[r] & K(\x1xn)\newline
}
\]

\end{document}