r - 使用列名称更改 ggplot2 (R) 的颜色

Question

我有一个数据框(见下文)，我想更改 ggplot2 中绘图的颜色，以便所有 A 为红色，B 为蓝色，C 为黑色，D 为黄色。

myDF

label    A    B    C    D
lab1 0.69 0.65 0.73 0.71
lab2 0.43 0.41 0.47 0.41
lab3 0.53 0.47 0.57 0.53
lab4 0.55 0.47 0.60 0.55
lab5 0.53 0.47 0.58 0.53

我尝试了以下方法:

p <- ggplot(myDF, aes(x=label)) 
     + geom_point(aes(y=A))
     + geom_point(aes(y=B))
     + geom_point(aes(y=C))
     + geom_point(aes(y=D))
     + scale_colour_manual(values=c("A"="red", "B"= "blue", "C"="black", "D"="yellow"))

但是它给了我一个错误。如果我不添加scale_colour_manual部分，它会给出正确的绘图，但全是黑点。我怎样才能做到这一点？提前致谢!

Answer 1

首先将数据转换为长格式。我会重新考虑白底黄字。

library(tidyr)
library(ggplot2)

myDF %>% 
  gather(key, value, -label) %>% 
  ggplot(aes(label, value)) + geom_point(aes(color = key)) +
    scale_colour_manual(values=c("red", "blue", "black", "yellow"))