Is there some reason you cannot lay two scatterplot (from car package) figures side by side?
library(car)
str(UN)
par(mfrow=c(1,2))
scatterplot(infant.mortality~gdp,data=UN,
xlab="GDP per capita",
ylab="Infant Morality Rate (per 1000 births)",
main="(a)",
boxplot=FALSE)
scatterplot(infant.mortality~gdp,data=UN,
xlab="GDP per capita",
ylab="Infant Morality Rate (per 1000 births)",
main="(b)",
log='xy',
boxplot=FALSE,id.n=4)
par(mfrow=c(1,1))
The above code produces both images, but not as one image side by side.