慕课—R语言之数据可视化—学习笔记 3.6ggplot2绘图系统（下）

3.6ggplot2绘图系统（下）

很抱歉，这些天工作太忙了，没有来得及更新自己的笔记，不过慕课上的该课程我已经学习完毕，都是在下班后地铁上的时间学的，屌丝啊，还得挤地铁。同时，对于ggplot绘图系统我并没有按照慕课上的进行。不过那上面的还是超级棒的。

接上次的笔记，本次对ggplot2系统进行次实战练习。效果图如下

来源于经济学人（http://www.economist.com/node/21541178（貌似长城了，）。数据csv文件我会上传到百度云，

地址:http://pan.baidu.com/s/1jIyG28I   密码mqvr

下面开始我们的挑战Start

1导入数据

library(ggplot2)
dat<-read.csv("F:/R_Project/EcoData.csv")

2绘制

pc1=ggplot(dat,aes(x=CPI,y=HDI,color=Region))
pc1+geom_point()

3美学上的设置

3.1初步加工

(pc2 <- pc1 + geom_smooth(aes(group = 1),
              method = "lm",
              formula = y ~ log(x),
              se = FALSE,
              color = "red")) +
  geom_point()

pc2 +  geom_point(shape = 1, size = 4)

结果如下图：

3.2 根据等级设置大小

pc3 <- pc2 +
  geom_point(size = 4.5, shape = 1) +
  geom_point(size = 4, shape = 1) +
  geom_point(size = 3.5, shape = 1)