Preparation

Import data.

values = c(10, 12, 4, 16, 8)
states = c("US", "UK", "Australia", "Germany", "France")

Simple pie charts

Produce a simple pie chart.

pie(values, labels=states)

Add percentages.

pct <- round(values/sum(values)*100)
labels2 <- paste(states, " ", pct, "%", sep="")
pie(values, labels=labels2, col=rainbow(length(labels2)))

Produce a 3D pie chart.

library(plotrix)

pie3D(values, labels=states, explode=0.1)

Fan plot

Produce a fan plot.

library(plotrix)

fan.plot(values, labels=states)