r - `geom_line()`连接映射到不同组的点

Question

我想根据两个变量的相互作用对数据进行group编码，但只能将美观性映射到这些变量之一。 (另一个变量表示理论上应该等效的重复项)。我可以找到实现此目的的优雅方法，但似乎应该有一种更优雅的方法。

例如

# Data frame with two continuous variables and two factors 
set.seed(0)
x <- rep(1:10, 4)
y <- c(rep(1:10, 2)+rnorm(20)/5, rep(6:15, 2) + rnorm(20)/5)
treatment <- gl(2, 20, 40, labels=letters[1:2])
replicate <- gl(2, 10, 40)
d <- data.frame(x=x, y=y, treatment=treatment, replicate=replicate)

ggplot(d, aes(x=x, y=y, colour=treatment, shape=replicate)) + 
  geom_point() + geom_line()

这几乎是正确的，只是我不想用不同的形状来表示这些点。似乎group=interaction(treatment, replicate)会有所帮助(例如，基于this question，但geom_line()仍会连接不同组中的点:

ggplot(d, aes(x=x, y=y, colour=treatment, group=interaction("treatment", "replicate"))) + 
  geom_point() + geom_line()

我可以通过手动创建一个交互列和group ing来解决该问题:

d$interact <- interaction(d$replicate, d$treatment)

ggplot(d, aes(x=x, y=y, colour=treatment, group=interact)) + 
  geom_point() + geom_line()

但似乎应该有一种更多的ggplot2 -native方法，使geom_line仅连接来自同一组的点。

Answer 1

如果执行以下操作，您的代码将起作用。我认为您有一个问题，因为aes将"treat"和"replicate"视为向量，所以它等效于group = 1。

ggplot(d, aes(x=x, y=y, colour=treatment, group=interaction(treatment, replicate))) + 
  geom_point() + geom_line()