Michi,

The code that you shared was incomplete.  Two objects (plant_labels and 
colors) were not defined.

The pie chart would be easier to interpret by direct labeling of slices, 
rather than trying to decipher a color legend.  If you change the initial 
angle of the first slice, you can rotate the pie in such a way that the 
slices can be labelled with the full plant names with no overlap, even 
without using a smaller font.

plants <- c(11, 5, 4, 4, 4, 3, 3, 3, 3, 3, 3, 2, 2, 2, 2, 2, 2, 43) 
plant.names <- c("Rubiaceae", "Aspleniaceae", "Compositae", 
"Euphorbiaceae", 
        "Piperaceae", "Acanthaceae", "Dryopteridaceae", "Cucurbitaceae", 
"Rosaceae", 
        "Rutaceae", "Urticaceae", "Apocynaceae", "Cyperaceae", 
"Gramineae", "Labiatae", 
        "Leguminosae", "Menispermaceae", "Rest (50 families)")
par(mar=c(2, 4, 2, 4))
pie(plants, labels=plant.names, init.angle=45)

Jean


Michael Eisenring <michael.eisenring@gmx.ch> wrote on 07/27/2012 05:15:17 
AM:
> 
> Dear R-help members,
> I did the following pie chart:
> 
> R:Code=
> 
> plants<-c(11,5,4,4,4,3,3,3,3,3,3,2,2,2,2,2,2,43)
> pie(plants,labels =plant_labels,cex=0.7, col=colors)
> par(mar=c(0,0,4,0),oma=c(0,0,0,0))
> legend(1,1,cex=0.7,pt.cex=25, c
> 
("Rubiaceae","Aspleniaceae","Compositae","Euphorbiaceae","Piperaceae","Acanthaceae","Dryopteridaceae","Cucurbitaceae","Rosaceae","Rutaceae","Urticaceae","Apocynaceae","Cyperaceae","Gramineae","Labiatae","Leguminosae","Menispermaceae","Rest
> (50 families)"),fill=colors)
> 
> As you can see the legend is not displayed proberly. 
> 
> 1)How can I move the pie chart as well as the legend together to the
> left? I tried to work with "mar" and "omar", without any success.
> 2) How can I increase the legend font size without increasing the 
> size of the "legend points"? I tried to do this with "cex" and "pt.cex2
> 
> 
> Thank you very much
> all the best
> Michi

	[[alternative HTML version deleted]]

