R语言学习：用ggplot2画折线图

本文是个人学习笔记

想把图画做的好看一点，于是学习了一下R语言里的ggplot包。

一、数据集

因为我需要画三个组的平均数据，首先要对每个组的被试数据进行平均，然后这样摆放数据：

group	block	mean_score
SA	1	xx
SA	2	xx
…
SI	1	xx
SI	2	xx
…

因为x轴是block，所以要将不同的block组成一列。

二、ggplot的通用构造

ggplot(data, aes(x, y)) + gemo_X( )

ggplot(data, aes(x, y))
这里用来选择使用的数据，以及进行美学处理，aes就是aesthetic的意思。

gemo_X( )
而这一部分是在图片中加入所需要的几何图形。这里的X可以替换成point, line等。

这是一个通用构造，做图则可以套用此公式。

三、折线图

ggplot(data = dataplot, aes(x = block, y = score,  color = group, shape = group)) + 
  geom_point(size = 3) + 
  geom_line(size = 1) + 
  labs(x = "IGT Block", y = "Mean Net Score") + 
  geom_hline(aes(yintercept=0), alpha = 0.65) #加入一条平行于x轴的线，透明度（alpha）调成了65%

这是我的通用脚本。

x，y就是两个轴的变量。color = group, shape = group, 可将不同的group通过不同的颜色和形状表示，但前提是group要变成factor变量。可通过以下代码实现：

group <- as.factor(dataplot$group)

labs( )函数可以改x，y轴的标签，也可以给图加标题，具体用法可在使用命令?labs调出。

效果图

本文参考了《R数据加工与分析呈现宝典》 [美]乔纳森·卡罗尔