ggplot 按组和子组绘制线图，没有刻面答案

【问题标题】：ggplot line plot by group and sub-group without a facetggplot 按组和子组绘制线图，没有刻面
【发布时间】：2020-06-08 09:50:49
【问题描述】：

我想知道是否可以在不使用网格函数的情况下为 2 个变量绘制单独的线。我更喜欢一张图表上的 4 条线，而不是 2 个网格中的 2 条线。如果我不能，那也没关系，但我想我会问。

我的数据如下：

nd<-data.frame(Machine = c(2,2,3,3,2,2,3,3), 
Source = c("tube", "machine","tube", "machine","tube", "machine","tube", "machine"),
Time=c(0,0,0,0,2,2,2,2), 
Count=c(224000, 107000, 850000, 940000, 610000,116000, 1160000, 1100000))

这段代码给了我我想要的一个方面......

ggplot(data=nd, aes(x=Time, y=Count, group=Machine, color=Machine)) +
 geom_line(aes(group=Machine))+ geom_point()+facet_grid(~Source)

有没有替代方案？

附：即使 Machine 是一个因子变量，为什么我的图例显示它是连续的？

【问题讨论】：

ggplot(data=nd, aes(x=Time, y=Count, color=interaction(Machine,Source))) + geom_line() + geom_point()
不客气 :)
@StupidWolf 您应该将其发布为答案

标签： r plot grouping line

【解决方案1】：

一种快速的方法是使用interaction 函数，该函数用“.”粘贴两个变量

ggplot(data=nd, aes(x=Time, y=Count, color=interaction(Machine,Source))) +
geom_line() + geom_point() +
scale_color_manual("groups",
values=c("#61d4b3","#fdd365","#fb8d62","#fd2eb3"))

【讨论】：