我试图创建我跟踪的两条鱼的散点图，显示它们随着时间的推移在不同的深度。我试图将它们从主数据框中提取出来，但图中只显示了一个。
p1 <- ggplot(subset(Data.df,ID %in% c(Data.df$ID == "9" , "11")))
p1 <- p1 + geom_point(aes(dt, d, colour=as.factor(ID), shape=as.factor(ID)))
p1 <- p1 + scale_shape_manual(values=c(3, 6))
p1 <- p1 + scale_color_manual(breaks = c("ID == 9", "ID == 11"), values=c("red", "blue"))
p1
下图是上面生成的图，但正如您所看到的，它只显示了鱼 11 的结果。我如何让它同时显示两者。
你的错误是你的子集。Data.df$ID == "9" 创建一个长度的逻辑向量，Data.df$ID然后将其c(Data.df$ID == "9" , "11")强制转换为字符，因为"ll". 因此，您的子集试图匹配“TRUE”、“FALSE”或“11”，但仅找到“11”。此外，您不需要breaks参数scale_color_manual。
p1 <- ggplot(subset(Data.df,ID %in% c("9" , "11")))
p1 <- p1 + geom_point(aes(dt, d, colour=as.factor(ID), shape=as.factor(ID)))
p1 <- p1 + scale_shape_manual(values=c(3, 6))
p1 <- p1 + scale_color_manual(values=c("red", "blue"))
p1
本文收集自互联网，转载请注明来源。
如有侵权，请联系 [email protected] 删除。
我来说两句