dos diapositivas de beamer / sweave de columna con gráfico de cuadrícula

Estoy tratando de hacer una presentación en gráficos ggplot2 usando beamer + sweave. Algunas diapositivas deben tener dos columnas; el izquierdo para el código, el derecho para el gráfico resultante. Esto es lo que ...