R help - Nov 2013 - Help with removing extra legend elements in ggplot

I can't get the fine tuning right with my legend. I get an extra legend
element "10" which is the point size in my plot. Can someone help me
get rid
of this extra element? Additionally I would also like to reduce the size of
the legend.

If you want to reproduce my figure you can  download my data in csv format
here
<https://github.com/scoyoc/EcoSiteDelineation/blob/master/VegNMDS_scores.csv
>
.

Here is my code...
>veg.nmds.sc = read.csv("VegNMDS_scores.csv", header = T)
>nmds.fig = ggplot(data = veg.nmds.sc, aes(x = NMDS1, y = NMDS2))
>nmds.fig + geom_point(aes(color = VegType, shape = VegType, size = 10)) +
>  scale_colour_manual(name = "Vegetation Type",
>                      values = c("blue", "magenta",
"gray50", "red",
> "cyan3",
>                                 "green4", "gold")) +
>  scale_shape_manual(name = "Vegetation Type", values = c(15, 16,
17, 18,
> 15, 16, 17)) +
>  theme_bw() +
>  theme(panel.background = element_blank(), panel.grid.major >
element_blank(),
>        panel.grid.minor = element_blank(),
>        legend.key = element_rect(color = "white")
>        )
I have been messing around with
>  theme(..., legend.key.size = unit(1, "cm"))
but I keep getting the error "could not find function unit". I'm
not sure
why, isn't unit supposed to be part of the legend.key argument?

... and the resulting figure...
<http://r.789695.n4.nabble.com/file/n4680764/VegNMDS.jpeg
>
Thanks for the help.
MVS
====Matthew Van Scoyoc
Graduate Research Assistant, Ecology
Wildland Resources Department <http://www.cnr.usu.edu/wild/> & Ecology
Center <http://www.usu.edu/ecology/>
Quinney College of Natural Resources <http://cnr.usu.edu/>
Utah State University
Logan, UT
====Think SNOW!

	[[alternative HTML version deleted]]

On Nov 19, 2013, at 3:44 PM, Matthew Van Scoyoc wrote:
> I can't get the fine tuning right with my legend. I get an extra legend
> element "10" which is the point size in my plot. Can someone help
me get rid
> of this extra element? Additionally I would also like to reduce the size of
> the legend.
> 
> If you want to reproduce my figure you can  download my data in csv format
> here
>
<https://github.com/scoyoc/EcoSiteDelineation/blob/master/VegNMDS_scores.csv
>> 
> .
> 
> Here is my code...
> 
>> veg.nmds.sc = read.csv("VegNMDS_scores.csv", header = T)
> 
>> nmds.fig = ggplot(data = veg.nmds.sc, aes(x = NMDS1, y = NMDS2))
>> nmds.fig + geom_point(aes(color = VegType, shape = VegType, size = 10))
+
>> scale_colour_manual(name = "Vegetation Type",
>>                     values = c("blue", "magenta",
"gray50", "red",
>> "cyan3",
>>                                "green4", "gold")) +
>> scale_shape_manual(name = "Vegetation Type", values = c(15,
16, 17, 18,
>> 15, 16, 17)) +
>> theme_bw() +
>> theme(panel.background = element_blank(), panel.grid.major >>
element_blank(),
>>       panel.grid.minor = element_blank(),
>>       legend.key = element_rect(color = "white")
>>       )
> 
> I have been messing around with
>> theme(..., legend.key.size = unit(1, "cm"))
> but I keep getting the error "could not find function unit".
I'm not sure
> why, isn't unit supposed to be part of the legend.key argument?
Try this workaround to what sounds like a bug:

library(grid)

# then repeat the call.

-- 

David Winsemius
Alameda, CA, USA

On Tue, 19 Nov 2013 16:44:11 -0700
Matthew Van Scoyoc <scoyoc at gmail.com> wrote:

You want to consider this as a programming bug in your code.  Executing
each line sequentially shows that the problem appears in the second
line:

nmds.fig + geom_point(aes(color = VegType, shape = VegType, size = 10))

?aes() and ?geom_point() reveals a misplaced right parenthesis. "Size"
belongs to geom_point(), not aes() as you have it grouped.

jwdougherty