R语言绘图数据可视化pie chart饼图

　　p<-ggplot(data,aes(x="",y=Percentage,fill=Group)) +

　　geom_bar(stat = "identity",color="white") +

　　scale_fill_manual(values = c("#FFA533","#2BCF76","#4874EC","#A372E6")) +

　　coord_polar(theta = "y") +

　　theme(axis.text.x = element_blank(),

　　axis.ticks = element_blank(),

　　panel.grid = element_blank()) +

　　geom_text(aes(y= cumsum(percent)-percent/2, x= 1),label=mylabel)

　　p

您可能感兴趣的文章:

相关文章

R语言绘图数据可视化pie chart饼图