宝慕林4294392
例子:## 数据pie.sales <-c(39,200,42,15,67,276,27,66)names(pie.sales) <- c("EUL","PES","EFA","EDD","ELDR","EPP","UNE","other")## 分屏split.screen(c(2,2))## figure 1screen(1)pie(pie.sales,radius = 0.9,main = "Ordinary chart")## figure 2screen(2)pie(pie.sales,radius = 0.9,col = rainbow(8),clock = T,main = "Rainbow colours")## figure 3screen(3)pie(pie.sales,radius = 0.9,clock = T,col = gray(seq(0.4,1.0,length = 8)),main = "Grey colours")## figure 4screen(4)pie(pie.sales,radius = 0.9,density = 10,angle = 15 + 15*1:8,main = "The density of shading lines")不懂的可以放弃R语言了。。。