\begin{Schunk}
\begin{Sinput}
 library(scatterplot3d)
 s3d <- scatterplot3d(x,y,z, type="p", color="blue", angle=45, pch=18, main="", xlab="normal x",ylab="poisson y", zlab="linear z")
\end{Sinput}
\end{Schunk}
