Many completed charts in one chart using par (mfrow = c ())

I am trying to build a graph consisting of 2-3 filled.contourgraphs next to each other. The color scale is the same for all graphs, and I only need one key for the key of the z value key. I'm having difficulty with this:par(mfrow=c(1,3))

Code example:

x <- 1:5
y <- 1:5
z <- matrix(outer(x,y,"+"),nrow=5)
filled.contour(x,y,z)
filled.contour(x,y,z,color.palette=rainbow)
z2 <- z
z2[5,5] <- Inf
filled.contour(x,y,z2,col=rainbow(200),nlevels=200)

Is it possible to place 2-3 of these graphs next to each other with only one color key z? I can do this in GIMP, but I was wondering if this is possible from R.