Barplot and colors for legend

Hi all!

One quick question: How do I get the standard

used by barplot? I have 
some stacked bars and would like to add a

legend via legend() but I 
don't know how to find the colors for the fills of

legend points.

Thanks!
  Werner

Type
  barplot.default
and read the code:

for a vector: "grey",
for a matrix: grey(seq(0.3^2.2, 0.9^2.2, length =
nrow(height))^(1/2.2))

This must be an old version of R ;-)

In R 2.1.0, there is a function gray.colors() which

gamma-corrected gray colors (and is used in

Best,
Z