在R ggplot2中使用scale_x_discrete [英] Use of scale_x_discrete in R ggplot2

查看:235
本文介绍了在R ggplot2中使用scale_x_discrete的处理方法,对大家解决问题具有一定的参考价值,需要的朋友们下面随着小编来一起学习吧!

问题描述

我在R中的ggplot2中使用离散标度时遇到问题.

I have a problem using the discrete scale in ggplot2 in R. The use of

g + scale_x_discrete(breaks=1:7, labels=1:7)

错误地改变了图的界限.

incorrectly changes in limits of a plot.

之前:

之后:

对于用于生成图像的代码,我看不到任何可疑的地方,但就是这样:

I cannot see anything suspicious about the code I use to produce the image, but here is it:

g <- ggplot(data=plottingData, aes(x=x, y=y, ymin=ymin, ymax=ymax)) +
geom_bar(stat="identity", fill=col) +
geom_errorbar(width=0.5*binwidth, size=0.3)

这是生成的ggplot2对象的dput():

And here is the dput() of the resulting ggplot2 object:

structure(list(data = structure(list(x = c(1, 2, 3, 4, 5, 6,  7), y = c(0.689655172413793, 0.689655172413793, 11.0344827586207,  2.75862068965517, 70.3448275862069, 13.7931034482759, 0.689655172413793 ), ymin = c(0, 0, 6.84765916431683, 0.870298113507349, 62.426550974053,  9.06894448064895, 0), ymax = c(4.26873021234759, 4.26873021234759,  17.3134146611865, 7.18339316166044, 77.1707644621886, 20.4612568616329,  4.26873021234759)), .Names = c("x", "y", "ymin", "ymax"), row.names = c(NA,  -7L), class = "data.frame"), layers = list(<environment>, <environment>),      scales = <S4 object of class structure("Scales", package = "ggplot2")>,      mapping = structure(list(x = x, y = y, ymin = ymin, ymax = ymax), .Names = c("x",      "y", "ymin", "ymax"), class = "uneval"), theme = structure(list(         line = structure(list(colour = "black", size = 0.5, linetype = 1,              lineend = "butt"), .Names = c("colour", "size", "linetype",          "lineend"), class = c("element_line", "element")), rect = structure(list(             fill = "white", colour = "black", size = 0.5, linetype = 1), .Names = c("fill",          "colour", "size", "linetype"), class = c("element_rect",          "element")), text = structure(list(family = "", face = "plain",              colour = "black", size = 12, hjust = 0.5, vjust = 0.5,              angle = 0, lineheight = 0.9), .Names = c("family",          "face", "colour", "size", "hjust", "vjust", "angle",          "lineheight"), class = c("element_text", "element")),          axis.text = structure(list(family = NULL, face = NULL,              colour = NULL, size = structure(0.8, class = "rel"),              hjust = NULL, vjust = NULL, angle = NULL, lineheight = NULL), .Names = c("family",          "face", "colour", "size", "hjust", "vjust", "angle",          "lineheight"), class = c("element_text", "element")),          strip.text = structure(list(family = NULL, face = NULL,              colour = NULL, size = structure(0.8, class = "rel"),              hjust = NULL, vjust = NULL, angle = NULL, lineheight = NULL), .Names = c("family",          "face", "colour", "size", "hjust", "vjust", "angle",          "lineheight"), class = c("element_text", "element")),          axis.line = structure(list(), class = c("element_blank",          "element")), axis.text.x = structure(list(family = NULL,              face = NULL, colour = NULL, size = NULL, hjust = NULL,              vjust = 1, angle = NULL, lineheight = NULL), .Names = c("family",          "face", "colour", "size", "hjust", "vjust", "angle",          "lineheight"), class = c("element_text", "element")),          axis.text.y = structure(list(family = NULL, face = NULL,              colour = NULL, size = NULL, hjust = 1, vjust = NULL,              angle = NULL, lineheight = NULL), .Names = c("family",          "face", "colour", "size", "hjust", "vjust", "angle",          "lineheight"), class = c("element_text", "element")),          axis.ticks = structure(list(colour = "black", size = NULL,              linetype = NULL, lineend = NULL), .Names = c("colour",          "size", "linetype", "lineend"), class = c("element_line",          "element")), axis.title.x = structure(list(family = NULL,              face = NULL, colour = NULL, size = NULL, hjust = NULL,              vjust = NULL, angle = NULL, lineheight = NULL), .Names = c("family",          "face", "colour", "size", "hjust", "vjust", "angle",          "lineheight"), class = c("element_text", "element")),          axis.title.y = structure(list(family = NULL, face = NULL,              colour = NULL, size = NULL, hjust = NULL, vjust = NULL,              angle = 90, lineheight = NULL), .Names = c("family",          "face", "colour", "size", "hjust", "vjust", "angle",          "lineheight"), class = c("element_text", "element")),          axis.ticks.length = structure(0.15, unit = "cm", valid.unit = 1L, class = "unit"),          axis.ticks.margin = structure(0.1, unit = "cm", valid.unit = 1L, class = "unit"),          legend.background = structure(list(fill = NULL, colour = NA,              size = NULL, linetype = NULL), .Names = c("fill",          "colour", "size", "linetype"), class = c("element_rect",          "element")), legend.margin = structure(0.2, unit = "cm", valid.unit = 1L, class = "unit"),          legend.key = structure(list(fill = NULL, colour = "grey80",              size = NULL, linetype = NULL), .Names = c("fill",          "colour", "size", "linetype"), class = c("element_rect",          "element")), legend.key.size = structure(1.2, unit = "lines", valid.unit = 3L, class = "unit"),          legend.key.height = NULL, legend.key.width = NULL, legend.text = structure(list(             family = NULL, face = NULL, colour = NULL, size = structure(0.8, class = "rel"),              hjust = NULL, vjust = NULL, angle = NULL, lineheight = NULL), .Names = c("family",          "face", "colour", "size", "hjust", "vjust", "angle",          "lineheight"), class = c("element_text", "element")),          legend.text.align = NULL, legend.title = structure(list(             family = NULL, face = "bold", colour = NULL, size = structure(0.8, class = "rel"),              hjust = 0, vjust = NULL, angle = NULL, lineheight = NULL), .Names = c("family",          "face", "colour", "size", "hjust", "vjust", "angle",          "lineheight"), class = c("element_text", "element")),          legend.title.align = NULL, legend.position = "right",          legend.direction = NULL, legend.justification = "center",          legend.box = NULL, panel.background = structure(list(             fill = "white", colour = NA, size = NULL, linetype = NULL), .Names = c("fill",          "colour", "size", "linetype"), class = c("element_rect",          "element")), panel.border = structure(list(fill = NA,              colour = "grey50", size = NULL, linetype = NULL), .Names = c("fill",          "colour", "size", "linetype"), class = c("element_rect",          "element")), panel.grid.major = structure(list(colour = "grey90",              size = 0.2, linetype = NULL, lineend = NULL), .Names = c("colour",          "size", "linetype", "lineend"), class = c("element_line",          "element")), panel.grid.minor = structure(list(colour = "grey98",              size = 0.5, linetype = NULL, lineend = NULL), .Names = c("colour",          "size", "linetype", "lineend"), class = c("element_line",          "element")), panel.margin = structure(0.25, unit = "lines", valid.unit = 3L, class = "unit"),          panel.margin.x = NULL, panel.margin.y = NULL, strip.background = structure(list(             fill = "grey80", colour = "grey50", size = 0.2, linetype = NULL), .Names = c("fill",          "colour", "size", "linetype"), class = c("element_rect",          "element")), strip.text.x = structure(list(family = NULL,              face = NULL, colour = NULL, size = NULL, hjust = NULL,              vjust = NULL, angle = NULL, lineheight = NULL), .Names = c("family",          "face", "colour", "size", "hjust", "vjust", "angle",          "lineheight"), class = c("element_text", "element")),          strip.text.y = structure(list(family = NULL, face = NULL,              colour = NULL, size = NULL, hjust = NULL, vjust = NULL,              angle = -90, lineheight = NULL), .Names = c("family",          "face", "colour", "size", "hjust", "vjust", "angle",          "lineheight"), class = c("element_text", "element")),          plot.background = structure(list(fill = NULL, colour = "white",              size = NULL, linetype = NULL), .Names = c("fill",          "colour", "size", "linetype"), class = c("element_rect",          "element")), plot.title = structure(list(family = NULL,              face = NULL, colour = NULL, size = structure(1.2, class = "rel"),              hjust = NULL, vjust = NULL, angle = NULL, lineheight = NULL), .Names = c("family",          "face", "colour", "size", "hjust", "vjust", "angle",          "lineheight"), class = c("element_text", "element")),          plot.margin = structure(c(1, 1, 0.5, 0.5), unit = "lines", valid.unit = 3L, class = "unit")), .Names = c("line",      "rect", "text", "axis.text", "strip.text", "axis.line", "axis.text.x",      "axis.text.y", "axis.ticks", "axis.title.x", "axis.title.y",      "axis.ticks.length", "axis.ticks.margin", "legend.background",      "legend.margin", "legend.key", "legend.key.size", "legend.key.height",      "legend.key.width", "legend.text", "legend.text.align", "legend.title",      "legend.title.align", "legend.position", "legend.direction",      "legend.justification", "legend.box", "panel.background",      "panel.border", "panel.grid.major", "panel.grid.minor", "panel.margin",      "panel.margin.x", "panel.margin.y", "strip.background", "strip.text.x",      "strip.text.y", "plot.background", "plot.title", "plot.margin"     ), class = c("theme", "gg"), complete = TRUE), coordinates = structure(list(         limits = structure(list(x = NULL, y = NULL), .Names = c("x",          "y"))), .Names = "limits", class = c("cartesian", "coord"     )), facet = structure(list(shrink = TRUE), .Names = "shrink", class = c("null",      "facet")), plot_env = <environment>, labels = structure(list(         x = "x", y = "y", ymin = "ymin", ymax = "ymax"), .Names = c("x",      "y", "ymin", "ymax"))), .Names = c("data", "layers", "scales",  "mapping", "theme", "coordinates", "facet", "plot_env", "labels" ), class = c("gg", "ggplot"))

值得注意的是,expand参数仅略微调整绘图,而expand=c(0,0)不能解决问题.指定限制确实可以解决问题,但由于某些原因也可以删除轴标签.

Notably, the expand parameter only adjusts the plots slightly and expand=c(0,0) does not solve the problem. Specifying limits does solve the problem, but also removes the axis labels for some reason.

任何帮助将不胜感激.

推荐答案

添加g + scale_x_discrete()时可能已经发生了.当对连续数据使用离散刻度时,会发生这种情况.没有休息,您可以看到错误的限制,只需更改它们即可.

That probably already happens when you add g + scale_x_discrete(). This happens when using a discrete scale for continuous data. Without the breaks, you can see the wrong limits and just change them.

g + scale_x_discrete()
g + scale_x_discrete(limits=1:7)
g + scale_x_discrete(limits=1:7, labels = letters[1:7])

或者,您可以使用factor从一开始就获得适当的限制.当然,您必须重命名轴.

Alternatively, you can use factor to get the proper limits from the beginning. Of course you'll have to rename the axis.

ggplot(data=plottingData, aes(x=factor(x), y=y, ymin=ymin, ymax=ymax)) +
  geom_bar(stat="identity", fill=col) +
  geom_errorbar(width=0.5*binwidth, size=0.3) +
  scale_x_discrete(name = 'x')

这篇关于在R ggplot2中使用scale_x_discrete的文章就介绍到这了,希望我们推荐的答案对大家有所帮助,也希望大家多多支持IT屋!

查看全文
登录 关闭
扫码关注1秒登录
发送“验证码”获取 | 15天全站免登陆