# Change the size of a graphic inside a legend [duplicate]

I have this graph:

ShowLegend[
Plot[Sin[x], {x, 0, 10}, Filling -> Axis, FillingStyle -> {Red, Blue}],
{{{Graphics[{Blue, Disk[{0, 0}, 1]}, ImageSize -> 5], Sin[x] > 0}, {Graphics[{Red, Disk[{0, 0}, 1]}], Sin[x] < 0}}}]


and I would like to change the size of the disks in the legend. Unfortunately, using the ImageSize option doesn't work Graphics[{Red, Disk[{0, 0}, 1]},ImageSize -> 2]

What should I do in this case?

-

## marked as duplicate by Öskå, bobthechemist, RunnyKine, Jens, m_goldbergJul 29 '14 at 23:22

What version are you using? –  Öskå Jul 29 '14 at 16:14
@Öskå version 9, although I might migrate to version 10 very soon, especially if you tell me it's easier to do so in version 10 –  Sulli Jul 29 '14 at 16:20
What I was about to tell you is that Needs["PlotLegends"] is obsolete, the Plot option PlotLegends should be used now. –  Öskå Jul 29 '14 at 16:22
@Öskå Mathematica 9 told me it was obsolete, but it still seems to work, and I've seen many people on Stackexchange who don't recommend using PlotLegends? Was it before and now it works well? –  Sulli Jul 29 '14 at 16:27
You may have seen many people who don't recommend using PlotLegend but PlotLegends instead :) Since v9 PlotLegend has been replaced by PlotLegends and it works pretty fine I think :) –  Öskå Jul 29 '14 at 16:40

Just change the value of LegendMarkerSize to the size that you want. Look more into PlotLegends and SwatchLegend in the documentation.
Plot[Sin[x], {x, 0, 10}, Filling -> Axis, FillingStyle -> {Red, Blue},
`