r - 如何在 R 中的绘图上连接数据点(对于每个主题)？

Question

我正在绘制每个主题对两个块(A 块和 B 块)中“相同”或“不同”刺激的 react 比例，这意味着每个主题都绘制了 4 个数据点。两个用于 A 块(相同和不同)，两个用于 B 块(相同和不同)。也意味着有 4 行数据包含每个主题的响应比例。
我想连接每个主题的“相同”和
“不同”数据点在一个块内用一条线(例如，它们的一个“相同”数据点和“不同”数据点通过每个主题的 A 块内和 B 块内的线连接)。
我尝试使用 geom_line() 附带的“group = subject”，但是当我只想连接每个块内的数据点时，它会连接所有主题的数据点。

testplot <- ggplot(df, aes(x=block, y=prop, shape=con, colour=con)) +
  geom_point(position=position_dodge(width=.1)) +
  xlab("Block") + ylab("Prop of responses") +
  theme_bw(base_size = 13) +
  theme(legend.position="top")
plot(testplot)

样本数据集:

subj = c(1, 1, 2, 2, 3, 3, 4, 4, 1, 1, 2, 2, 3, 3, 4, 4)
prop = c(0.5, 0.8, 0.3, 0.7, 0.9, 0.4, 0.1, 0.5, 1, 0.5, 0.9, 0.2, 0.7, 0.4, 0.8, 0.1)
con = c("same", "same", "same", "same", "same", "same", "same", "same", "diff", "diff", "diff", "diff", "diff", "diff", "diff", "diff")
block = c("A", "B", "A", "B", "A", "B", "A", "B", "A", "B", "A", "B", "A", "B", "A", "B")

df = data.frame(subj, prop, con, block)

我希望这是有道理的，这可行吗？任何帮助表示赞赏!

Answer 1

我认为最好的方法是使用 facet_grid :

ggplot(df, aes(x=con, y=prop, shape=con)) +
  geom_point(aes(color=con), position=position_dodge(width=.1)) +
  geom_line(aes(group = subj)) +
  facet_grid(.~block) +
  xlab("Block") + ylab("Prop of responses") +
  theme_bw(base_size = 13) +
  theme(legend.position="top")