par(mar=c(1,1,1,1)) palette(gray(0:50 / 50)) #修改調色盤的顏色 pie(rep(1,50), col=palette(), border = palette(), main = "Gray")
