\begin{Schunk}
\begin{Sinput}
 x <- c(2L, 3L, 3L, 4L, 5.5323)
 is.integer(x)
\end{Sinput}
\begin{Soutput}
[1] FALSE
\end{Soutput}
\begin{Sinput}
 x
\end{Sinput}
\begin{Soutput}
[1] 2.0000 3.0000 3.0000 4.0000 5.5323
\end{Soutput}
\begin{Sinput}
 is.double(x)
\end{Sinput}
\begin{Soutput}
[1] TRUE
\end{Soutput}
\end{Schunk}
