\begin{Schunk}
\begin{Sinput}
 #image(x1, x2, probX, col = terrain.colors(100), axes = FALSE)
 
 contour(x1,x2,probX)
 
\end{Sinput}
\end{Schunk}
