r - 使用 qplot 制作点图

Question

我想制作一个包装器qplot，将默认几何图形从更改histogram为dotplot如果x是数字并且y为空。但是我无法qplot使用geom_dotplot：

> x <- rnorm(100)
> qplot(x, geom="dotplot")
stat_bindot: binwidth defaulted to range/30. Use 'binwidth = x' to adjust this.
Error in if (params$stackdir == "up") { : argument is of length zero

我如何使用qplot来创建这个数字：

ggplot(,aes(x=x)) + geom_dotplot()

Answer 1

qplot 缺少为 geom_dotplot 设置的默认美学。您可以手动指定它们：

qplot(x, geom = "dotplot",
      stackdir = "up", stackgroups = FALSE, binaxis = "x")

加上 binwidth。

Answer 2

不是真正的答案，但请考虑这两种不会引发错误的尝试：

g <- qplot(x)
g + geom_dotplot()  # makes a weird hybrid dotplot and barplot

或者：

g <- qplot(x, stat="bindot")
g    # was expecting dots but got bars, go figure.