Help with removing extra legend elements in ggplot

On Tue, 19 Nov 2013 16:44:11 -0700

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