自ggplot2更新以来ggdraw存在的问题

自ggplot2更新以来ggdraw存在的问题,r,ggplot2,cowplot,R,Ggplot2,Cowplot,我用下面的代码做了一个图,但是,我最近注意到我的一些数据点没有像它们应该包含的那样包含错误条,所以我在编写代码几个月后重新访问了这段代码。在这段时间里,对ggplot2进行了更新,现在我的代码中出现了我不知道如何修复的错误。这些细节如下 我的代码是: p1 <- ggplot(dat3A, aes(x = d15N, y = Depth)) p4 <- p1 + geom_point(size = 1) + geom_path() + scale_y_

我用下面的代码做了一个图,但是,我最近注意到我的一些数据点没有像它们应该包含的那样包含错误条,所以我在编写代码几个月后重新访问了这段代码。在这段时间里,对ggplot2进行了更新,现在我的代码中出现了我不知道如何修复的错误。这些细节如下

我的代码是:

p1 <- ggplot(dat3A, aes(x = d15N, y = Depth))

p4 <- p1 + 
    geom_point(size = 1) + 
    geom_path() + 
    scale_y_continuous(expand =  c(0, 0), limits = c(15,0), trans = "reverse") + 
    scale_x_continuous(expand = c(0, 0), limits = c(0,20)) + 
    labs(x=expression(paste(delta^'15', N[NO3],('\u2030'))), y='Depth (cm)') + 
    theme_bw() + 
    theme(axis.line = element_line(colour = "black"), 
        panel.grid.major = element_blank(), 
        panel.grid.minor = element_blank(),    
        panel.border = element_blank(), 
        panel.background = element_blank()) +
    geom_errorbarh(aes(xmax=d15N+d15NError, xmin=d15N-d15NError))+ 
    ggtitle("d") + 
    theme(plot.title = element_text(hjust = 0, size=8))+
    theme(axis.text = element_text(size=6), axis.title=element_text(size=8))
p13 <- ggdraw(switch_axis_position(p4, axis = 'x'))

p1来自
cowplot
vignette:

从ggplot2.2.0开始,该软件包现在本机支持次轴 以及绘图两侧的轴。因此,cowplot函数 开关轴位置()已被弃用,因为它始终是一个 丑陋的黑客和难以维护

实际上,
ggplot2
现在具有
coord\u flip
功能<代码>开关轴位置(p4,轴='x')
已被
+缩放x连续(位置='right')取代。

加。。您可能需要稍微整理一下图形结构

p13 <- ggplot(dat3A, aes(x = d15N, y = Depth)) + 
  geom_point(size = 1) + 
  geom_path() + 
  geom_errorbar(aes(xmax = d15N + d15NError, xmin = d15N - d15NError)) + 
  scale_y_continuous(expand =  c(0, 0), limits = c(15,0), trans = "reverse") + 
  scale_x_continuous(expand = c(0, 0), limits = c(0,20), position = 'right') + 
  labs(x=expression(paste(delta ^ '15', N[NO3], ('\u2030'))), y = 'Depth (cm)') + 
  ggtitle("d") + 
  theme_bw() + 
  theme(axis.line = element_line(colour = "black"), 
        panel.grid.major = element_blank(), 
        panel.grid.minor = element_blank(),    
        panel.border = element_blank(), 
        panel.background = element_blank(),
        plot.title = element_text(hjust = 0, size=8),
        axis.text = element_text(size=6),
        axis.title=element_text(size=8))

p13
geom_errorbarh
是来自
ggstance
包装的水平geom。目前尚不清楚OP是否使用了该软件包,但可能不是打字错误。谢谢您的帮助!这解决了我所有的问题!我正打算使用GeoMeMeError BARH,但这只是我所知道的GGPLOTT2。如果你认为可以帮助别人,请考虑投票和接受答案。