R语言----绘制点与点连线图

引用于：公众号“R语言和统计”，原标题为“这篇《新英格兰医学杂志》论文中的美丽的图到底是怎么画的？附R代码‘

> mydata<-data.frame(
+ ID=c(rep(1:10,2),rep(11:20,2)),
+ treatment=rep(c("v","p"),each=20),
+ time=rep(c("before","after","before1","after1"),each=10),
+values=c(rnorm(10,mean=100,sd=30),rnorm(10,mean=150,sd=30),rnorm(10,mean=100,sd=30),rnorm(10,mean=100,sd=30))
+ )

head(mydata,20)

tail(mydata,20)

ggplot(mydata,aes(time,values,fill=time))+
+ geom_point(shape=21,size=3,show.legend=F)+
+ scale_x_discrete(limits=c("before","after","before1","after1"),labels=c("before","after","before","after"))+
+ scale_fill_manual(values=c("indianred3","steelblue","indianred3","steelblue"))+
+ geom_hline(yintercept=150,linetype="dashed")+

+ geom_path(data=mydata, aes(x = time,y = values), inherit.aes = FALSE )+
+ geom_line(data=filter(mydata,treatment=="v"),aes(group==ID))+
+ geom_line(data=filter(mydata,treatment=="p"),aes(group==ID))+

+ xlab("mRNA-1273 Placebo")+
+ ylab("Anti-RBD Antibody(U/ml)")+
+ theme_classic()

与作者的结果还有两处不同，待更

1.点与点连线，线穿过了点

2.原作者垂直没有连接线

在敲代码时，遇到Error in FUN(X[[i]], ...) : 找不到对象'group'

解决办法是参考了网络解决方案

+ geom_path(data=mydata, aes(x = time,y = values), inherit.aes = FALSE )

R语言----绘制点与点连线图相关推荐

R语言绘制IPCC风格箱线抖动点图
R语言绘制IPCC风格箱线抖动点图今天"复现"这张图片,来自IPCC AR6 使用base R而非ggplot,baseR对于细节的把控更强一些直接上代码 library(gg ...
R语言ggplot2可视化在lines线图的尾端添加线图标签、并且去除图例实战
R语言ggplot2可视化在lines线图的尾端添加线图标签实战目录 R语言ggplot2可视化在lines线图的尾端添加线图标签实战 #仿真数据
R语言绘制不一样的韦恩图
image.png 韦恩图本来是不想说的,因为很简单,也有在线工具,然而还是有小伙伴询问如何制作韦恩图,那种韦恩图的元素大小用不同大小的圈表示,在线工具可以实现:http://www.biovenn. ...
R语言绘制圈图、环形热图可视化基因组实战：展示基因数据比较
最近我们被客户要求撰写关于基因组的研究报告,包括一些图形和统计输出. 可以使用环状图形展示基因数据比较.可以添加多种图展信息,如热图.散点图等. 本文目标: 可视化基因组数据制作环形热图环形热图很 ...
R语言ggplot2可视化线图（line plot）:当数据有中断、缺失时R不会将数据绘制为连续的线图、而是出现断点
R语言ggplot2可视化线图(line plot):当数据有中断.缺失时R不会将数据绘制为连续的线图.而是出现断点目录
R语言绘制线图（line）实战
R语言绘制线图(line)实战目录 R语言绘制线图(line)实战 #仿真数据 #基础线图
R语言绘制棒棒糖图（火柴杆图）
本博客介绍几种利用R语言绘制棒棒糖图(火柴杆图)的方法. 2. 使用原生ggplot方法最容易也是最简单想到的方法是直接使用ggplot2包进行更新,这里需要使用ggplot本身的特性,通过图层叠加 ...
R语言绘制环形树状图
R语言绘制环形树状图 1.主要用到dendextend和circlize包绘图: library(dendextend) library(circlize)# 距离矩阵 d <- dist(US ...
R语言绘制二维密度图
R语言绘制二维密度图二维密度图显示了两个数值变量之间的关系,一个在x轴上表示,另一个在Y轴上表示,与散点图类似,然后计算二维空间中特定区域内的观测数,并用颜色梯度表示.二维密度图有几种类型,以下主要 ...

R语言----绘制点与点连线图

R语言----绘制点与点连线图相关推荐

最新文章

热门文章