<>= using Gadfly x = linspace(0, 2π, 200) plot(x=x, y = sin(x), Geom.line) @ <>= plot(x=x, y = cos(x), Geom.line) @ <>= plot(x=x, y = cos(2x), Geom.line) @ <>= x = linspace(0, 2π, 200) plot(x=x, y = sin(x), Geom.line) y = 20 plot(x=x, y = cos(x), Geom.line) @ <>= x = linspace(0, 2π, 200) plot(x=x, y = sin(x), Geom.line) y = 20 plot(x=x, y = cos(x), Geom.line) @