Question

假设我有两个箱图。

trial1 <- ggplot(completionTime, aes(fill=Condition, x=Scenario, y=Trial1))
trial1 + geom_boxplot()+geom_point(position=position_dodge(width=0.75)) + ylim(0, 160)

trial2 <- ggplot(completionTime, aes(fill=Condition, x=Scenario, y=Trial2))
trial2 + geom_boxplot()+geom_point(position=position_dodge(width=0.75)) + ylim(0, 160)

如何在同一个地块和相同的X上绘制试验1和试验2？它们具有相同的y范围。

我查看了geom_boxplot（position =“identity”），但是在同一个X上绘制了两个条件（填充）。

我想在同一个X上绘制两个y列。

编辑：数据集

User Condition Scenario Trial1 Trial2
1     1        ME        a     67     41
2     1        ME        b     70     42
3     1        ME        c     40     15
4     1        ME        d     65     23
5     1        ME        e     45     45
6     1        SE        a    100     34
7     1        SE        b     54     23
8     1        SE        c     70     23
9     1        SE        d     56     15
10    1        SE        e     30     20
11    2        ME        a     42     23
12    2        ME        b     22     12
13    2        ME        c     28      8
14    2        ME        d     22      8
15    2        ME        e     38     37
16    2        SE        a     59     18
17    2        SE        b     65     14
18    2        SE        c     75      7
19    2        SE        d     37      9
20    2        SE        e     31      7

dput（）

structure(list(User = c(1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 
2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L), Condition = structure(c(1L, 
1L, 1L, 1L, 1L, 2L, 2L, 2L, 2L, 2L, 1L, 1L, 1L, 1L, 1L, 2L, 2L, 
2L, 2L, 2L), .Label = c("ME", "SE"), class = "factor"), Scenario = 
structure(c(1L, 
2L, 3L, 4L, 5L, 1L, 2L, 3L, 4L, 5L, 1L, 2L, 3L, 4L, 5L, 1L, 2L, 
3L, 4L, 5L), .Label = c("a", "b", "c", "d", "e"), class = "factor"), 
Trial1 = c(67L, 70L, 40L, 65L, 45L, 100L, 54L, 70L, 56L, 
30L, 42L, 22L, 28L, 22L, 38L, 59L, 65L, 75L, 37L, 31L), Trial2 = c(41L, 
42L, 15L, 23L, 45L, 34L, 23L, 23L, 15L, 20L, 23L, 12L, 8L, 
8L, 37L, 18L, 14L, 7L, 9L, 7L)), .Names = c("User", "Condition", 
"Scenario", "Trial1", "Trial2"), class = "data.frame", row.names = c(NA, 
-20L))

Answer 1

你可以尝试使用interaction来合并你的两个因素，并与第三个因素进行比较。例如，假设您希望按照原始代码填写条件：

library(tidyr)
completionTime %>% 
gather(trial, value, -Scenario, -Condition, -User) %>%
ggplot(aes(interaction(Scenario, trial), value)) + geom_boxplot(aes(fill = Condition))

结果：

R ggplot2 - 如何在相同的x值上绘制2个箱图

1 个答案: