Ggplot2 删除gg.gap()图中的axis.titles

Ggplot2 删除gg.gap()图中的axis.titles,ggplot2,plot,label,axis,Ggplot2,Plot,Label,Axis,有人知道如何从gg.gap()绘图中删除axis.title.y吗? 我正在尝试使用theme(),但它不起作用 例如,使用gg.gap()包示例: 我做了一个没有任何y轴和x轴标题的ggplot(“p”plot),但当我在gg.gap中使用“p”在y轴中创建间隙时,轴标题再次出现 data(mtcars) library(ggplot2) p<-ggplot(data = mtcars, aes(x = gear, fill = gear)) +geom_bar() +ggtitle(

有人知道如何从gg.gap()绘图中删除axis.title.y吗? 我正在尝试使用theme(),但它不起作用

例如,使用gg.gap()包示例: 我做了一个没有任何y轴和x轴标题的ggplot(“p”plot),但当我在gg.gap中使用“p”在y轴中创建间隙时,轴标题再次出现

data(mtcars)
library(ggplot2)

p<-ggplot(data = mtcars, aes(x = gear, fill = gear)) +geom_bar() +ggtitle("Number of Cars by Gear") +xlab("Gears") + 
          theme( axis.title.y = element_blank(),
             axis.ticks.y = element_blank(),
             axis.text.y = element_blank(),
             axis.ticks.x = element_blank(),
             axis.text.x = element_blank())

pgg <- gg.gap(plot=p,segments=c(5,10),tick_width = c(1,10),ylim=c(0,50))


提前谢谢你

这个很有趣。正如@teunbrand所提到的,您应该能够通过
scale\u y\u continuous(name=”“)
或我的首选项:
name=NULL
来修复此问题。但它在任何排列中都不起作用

使用
lab(y=…)
ylab()
将轴标题设置为
NULL
。我认为无论您在哪里添加它,这都是有效的,但是在应用
gg.gap()
函数之前,似乎需要添加到绘图中:

# this doesn't work
p <- p + scale_y_continuous(NULL)
pgg <- gg.gap(plot=p,segments=c(5,10),tick_width = c(1,10),ylim=c(0,50))
pgg

# this doesn't work either
pgg + scale_y_continuous(NULL)

# this apparently won't work
pgg <- gg.gap(plot=p,segments=c(5,10),tick_width = c(1,10),ylim=c(0,50))
pgg + ylab(NULL)


# this works
p <- p + ylab(NULL)
pgg <- gg.gap(plot=p,segments=c(5,10),tick_width = c(1,10),ylim=c(0,50))
pgg
#这行不通

这个很有趣。正如@teunbrand所提到的,您应该能够通过
scale\u y\u continuous(name=”“)
或我的首选项:
name=NULL
来修复此问题。但它在任何排列中都不起作用

使用
lab(y=…)
ylab()
将轴标题设置为
NULL
。我认为无论您在哪里添加它,这都是有效的,但是在应用
gg.gap()
函数之前,似乎需要添加到绘图中:

# this doesn't work
p <- p + scale_y_continuous(NULL)
pgg <- gg.gap(plot=p,segments=c(5,10),tick_width = c(1,10),ylim=c(0,50))
pgg

# this doesn't work either
pgg + scale_y_continuous(NULL)

# this apparently won't work
pgg <- gg.gap(plot=p,segments=c(5,10),tick_width = c(1,10),ylim=c(0,50))
pgg + ylab(NULL)


# this works
p <- p + ylab(NULL)
pgg <- gg.gap(plot=p,segments=c(5,10),tick_width = c(1,10),ylim=c(0,50))
pgg
#这行不通

p您是否尝试过
+scale\u y\u continuous(name=“”)
?您是否尝试过
+scale\u y\u continuous(name=“”)
?非常感谢!!在我的数据中,我不知道为什么,但是第二种方法(pgg+ylab(NULL))不起作用,但是第一种方法是(p+ylan(NULL),然后是gg.gap plot)。所以非常感谢大家!!!这很有帮助!!是的,就像我说的,这是个有趣的问题。我不完全确定为什么这会起作用,但不是规模功能非常感谢!!在我的数据中,我不知道为什么,但是第二种方法(pgg+ylab(NULL))不起作用,但是第一种方法是(p+ylan(NULL),然后是gg.gap plot)。所以非常感谢大家!!!这很有帮助!!是的,就像我说的,这是个有趣的问题。我不完全确定这为什么有效,但不确定比例函数