在R中的boxplot中均匀分布数据点（使用ggplot2）

Question

我在箱线图中间距数据点时遇到问题。我使用以下代码。

DF1 <- data.frame(x = c(1, 2, 3, 4, 7, 11, 20, 23, 24, 25, 30), y = c(3, 6, 12, 13, 17, 22, NA, NA, NA, NA, NA))
library(ggplot2)
library(tidyverse)
n <- 11
DF1 <- as.data.frame(DF1)
DF1 <- reshape2::melt(DF1)
DF1 %>%
  group_by(variable) %>%
  arrange(value) %>%
  mutate(xcoord = seq(-0.25, 0.25, length.out = n())) %>%
  ggplot(aes(x = variable, y = value, group = variable)) +
  geom_boxplot() +
  geom_point(aes(x = xcoord + as.integer(variable)))

结果如下：

对于x，所有数据点从左到右均匀分布，但是由于y的数据点较少，因此它们并不是从左到右均匀分布。怎样修改上面的代码以使y的数据点也均匀分布？我将不胜感激。

我发现了一条与here类似的帖子，但这无济于事。

谢谢。

Answer 1

问题是NA中的y值。使用长格式后，您可以简单地省略它们：

plot_data = DF1 %>%
  na.omit %>%  ## add this here
  group_by(variable) %>%
  arrange(value) %>%
  mutate(xcoord = seq(-0.25, 0.25, length.out = n()))

ggplot(plot_data, aes(x = variable, y = value, group = variable)) +
  geom_boxplot() +
  geom_point(aes(x = xcoord + as.integer(variable)))