#Pie chart.

slices <- c(10,12,4,16,8)

lbls <- c("Manogo","Orange","Banana","Grape","Pine")

pie (slices, lables = lbls, main ="pie Chart of Fruits")

#3-D pie Chart.
library(plotrix)

slices <- c(10,12,4,16,8)

lbls <- c("Manogo","Orange","Banana","Grape","Pine")

pie3D(slices,lables,=lbls,explode=0.5,main="pie chart of fruits")