using Gadfly, DataFrames, Distributions
d1 = Normal(-1); d2 = Normal(1);
x=-4:0.01:4
y1 = pdf(d1,x); y2 = pdf(d2,x);
df1 = DataFrame(x=x,y=y1,ymin=0.0,ymax=y1,d="d1");
df2 = DataFrame(x=x,y=y2,ymin=0.0,ymax=y2,d="d2");
df = vcat(df1,df2)
p = plot(df, x=:x, y=:y, ymin=:ymin, ymax=:ymax, color=:d, Geom.line, Geom.ribbon)
draw(PNG("test1.png", 12cm, 6cm), p)p = plot(df, x=:x, y=:y, ymin=:ymin, ymax=:ymax, color=:d, Geom.line, Geom.ribbon, Theme(lowlight_opacity=0.5))