自定义ggplot2图例

Question

如果有人能告诉我如何在以下情节中修改图例，我将不胜感激：

  point_data <- data.frame(x = rnorm(10),
                           y = rnorm(10),
                           type=c(rep("A",5),rep("B",5)))

  line_data <- data.frame(x=c(-1,0),
                          y=c(1,0))

  ggplot(data=point_data,
         aes(x=x,
             y=y,
             colour=type)) +
    geom_point(size=0.75) +
    geom_line(data=line_data, 
              aes(x=x,y=y,colour="myline"))

我想从图例中删除“ myline”，而在“ A”和“ B”旁边仅包含点。

Answer 1

我将data和aes()移到geom_point并将color=从 geom_line，则图例中将只有“ A”和“ B”

ggplot() +
  geom_point(data=point_data, aes(x=x,
                 y=y,
                 color=type), size=0.75) +
  geom_line(data=line_data, 
            aes(x=x,y=y))