User Portlet User Portlet

Discussions
You can try making your legend separately and using GraphicsGrid to combine all three items. [mcode]lp = ListPlot[Thread[{Range[10], Sin[2.1 Range[10]]}], PlotStyle -> {Red, PointSize -> Large}]; p = Plot[Sin[2 x], {x, 0, 10}]; twoGraphs =...