R语言实战 - 基本图形(6)- 点图
> dotchart(mtcars$mpg, labels=row.names(mtcars), cex=.7, + main="Gas Mileage for Car Models", + xlab="Miles Per Gallon") >
> x <- mtcars[order(mtcars$mpg),] > x$cyl <- factor(x$cyl) > x$color[x$cyl==4] <- "red" > x$color[x$cyl==6] <- "blue" > x$color[x$cyl==8] <- "darkgreen" > dotchart(x$mpg, + labels=row.names(x), + cex=.7, + groups=x$cyl, + gcolor="black", + color=x$color, + pch=19, + main="Gas Mileage for Car Models\ngrouped by cylinder", + xlab="Miles Per Gallon") >
posted on 2017-09-24 23:54 你的踏板车要滑向哪里 阅读(262) 评论(0) 编辑 收藏 举报