\begin{Schunk}
\begin{Sinput}
 x3a <- c(10L, 9L, 8L, 7L, 6L, 5L, 4L, 3L, 2L, 1L)
 x3b <- seq(10L, 1L, by = -1L)
 x3c <- 10L:1L
 x3a
\end{Sinput}
\begin{Soutput}
 [1] 10  9  8  7  6  5  4  3  2  1
\end{Soutput}
\begin{Sinput}
 class(x3a)
\end{Sinput}
\begin{Soutput}
[1] "integer"
\end{Soutput}
\begin{Sinput}
 identical(x3a, x3b, x3c)
\end{Sinput}
\begin{Soutput}
[1] TRUE
\end{Soutput}
\end{Schunk}
