使用颜色填充的圆圈为ggplot传说

Question

我有以下代码

TRP_C<-100/(100+650)
FPR_C<-200/(200+650)
C<-data.frame(TPR=TRP_C,FPR=FPR_C)

TRP_D<-120/(120+30)
FPR_D<-350/(350+500)
D<-data.frame(TPR=TRP_D,FPR=FPR_D)


ggplot(NULL, aes(x=FPR, y=TPR)) +
    geom_point(data=C,shape=1,aes(fill="A"),size=4,color="red")+
    geom_point(data=D,shape=1,aes(fill="B"),size=4,color="green")

问题是它给了我一个ggplot，其中的要点根本不清楚。 我想，如果我可以填补积分，那么图表中会更清楚。

所以，我怎样才能制作传奇，并填充点数？

Answer 1

在shape和geom_point()内使用scale_fill_manual（插入21-25之间的值）作为颜色。

所以你的代码看起来像这样

ggplot(NULL, aes(x=FPR, y=TPR)) + 
  geom_point(data=C,shape=21,aes(fill="A"),size=4) +
  geom_point(data=D,shape=21,aes(fill="B"),size=4) +
  scale_fill_manual(values=c("red", "green"))

输出