R语言绘制堆积条形图和饼图（小白绘图自学记录）

今天用到的是mtcars这个data集~

1.查看数据集属性，设置workspace。

################################################
# the first 3 tasks with use mtcars data. check out the data frame using:
setwd('D:/rstudio')#设置自己的工作区
data("mtcars") #加载数据集
names(mtcars) #查看数据集属性名
head(mtcars) #查看前十条数据

数据集如下：

2、题目：用堆积条形图和饼图，可视化不同汽车的carb和gear，其中饼图用gear来分类。（gear是齿轮）

# Task 1: stacked bar vs pie chart
# visualize car models by gear and carb using both stacked bar and pie charts.
# separate the pie chart by gear

tab <- data.frame(table(mtcars$carb,mtcars$gear)) #选出要用的数据列
names(tab) <- c('carb','gear','Freq')  #给取出的数据列对应命名，切记对应着取出的顺序

library(ggplot2)  #绘图需要用到ggplot2的包
g1.1<- ggplot(tab, aes(x = gear, y=Freq, fill=carb))+   #stacked bar
  geom_bar(width = 1, stat = "identity") + theme_bw()
g1.1

加载出的堆积条形图，很容易读取到信息，比如6carb的汽车类型都是5个齿轮的，1carb的汽车类型有3个和4个齿轮，主要是4个齿轮的比较常见：

3、接下来做饼图：

g1.2 <- g1.1 + coord_polar("y") + facet_wrap(~ gear)  #绘制pie图，用gear来分开不同饼图
g1.2

饼图也很容易读出数据，如下图2carb的汽车有3、4、5的齿轮选项，其中4齿轮的最多。