[R] how to enlarge the legend

[Jinsong Zhao]

Hi there,

in the following code, I'd like to enlarge the filled box but not the 
legend text.

plot.new()

legend("topleft", "text", fill = "gray") # filled box is too small

legend("top", "text", fill = "gray", cex = 2) # filled box is ok but 
text is too large

# I can use point to mimic filled box, but can not fill it with pattern

legend("left", "text", pch = 22, pt.bg = "gray", pt.cex =3)

I'd like to get filled box enlarged but with text not to be changed. Is 
it possible?

Thanks in advance!

Best,

Jinsong