TimeInOfficePresent

w

x <- c(52, 30, 10, 8)
labels <- c("分析思考", "写代码、调试", "沟通", "其他")
png(file = "D:\Documents\r_action\TimeInOfficePresent.png")
pie(x,labels)
dev.off()

原文地址:https://www.cnblogs.com/rsapaper/p/7079473.html