How can I make Rasterize
to reproduce the graph and the legends in correct proportions? Thanks.
pl = Plot[Sin[x], {x, 0, 2 \[Pi]}, PlotRange -> Full,
AxesOrigin -> {0, 0}, PlotLegends -> names, PlotStyle -> Thick,
AxesStyle -> Directive[Black, 21], ImageSize -> Scaled[0.7] ]
Rasterize[pl, RasterSize -> 3000, ImageSize -> 1000]