如何将R饼图保存在光盘上为.jpg？

饼图示例：

slices <- c(10, 12, 4, 16, 8) 
lbls <- c("US", "UK", "Australia", "Germany", "France")
pct <- round(slices/sum(slices)*100)
lbls <- paste(lbls, pct) # add percents to labels 
lbls <- paste(lbls,"%",sep="") # ad % to labels 
pie(slices,labels = lbls, col=rainbow(length(lbls)),main="Pie Chart of Countries") 

jpeg(filename="Pie chart.jpg",width=480,height=480)
plot()
dev.off()

切片将饼图（…）放在plot（）现在所在的位置

永远不要使用饼图。曾经读Ed.Tufte的书。
jpeg(filename="Pie chart.jpg",width=480,height=480)
pie(slices,labels = lbls, col=rainbow(length(lbls)),main="Pie Chart of Countries") 
dev.off()