不同的标记随着刻面尺寸的增加而增加

Question

在我下面的示例代码中，我希望使用不同的marker而不是仅针对我选择的size的每个Grade使用circle 。 现在的size是根据sequence的alphabet -我想碰到它，至少在两个层面作为当前的起始size （从Grade A ）太小。

library(tidyverse)

DF1 = data.frame(Grade = c("A","B","C","D"), Fee = c(50, 100,80, 60), ST1 = c(0.5, 0.7, 0.67,0.60),
                 ST2 = c(0.48, 0.8, 0.697,0.77), ST3 = c(0.53, 0.58, 0.57,0.62), type = rep("Teenage",4))
DF2 = data.frame(Grade = c("A","B","C","D"), Fee = c(60, 120,90, 70), ST1 = c(0.55, 0.73, 0.65,0.70),
                 ST2 = c(0.58, 0.82, 0.73,0.75), ST3 = c(0.55, 0.52, 0.58,0.62), type = rep("Overage",4))

DFPlot_1 = gather(data = DF1, key = "Variable", value = "Value", -Fee, -Grade, -type)
DFPlot_2 = gather(data = DF2, key = "Variable", value = "Value", -Fee, -Grade, -type)

DF =rbind(DFPlot_1,DFPlot_2)
ggplot(data = DF, aes(x= Fee, color = Grade, size = Grade))+
  geom_point(aes(y = Value))+ facet_grid(type ~ Variable)

这是我在运行上述代码时得到的Figure查看大小(A is almost non-visibile) 。 我想增加规模，但从更高的水平开始。

Answer 1

如上所述，您要使用scale_size_manual 。 您有多种调整大小的方法（阅读文档），但适合您的情况的示例是：

ggplot(data = DF, aes(x= Fee, color = Grade, size = Grade))+
  geom_point(aes(y = Value))+ facet_grid(type ~ Variable) + 
  scale_size_manual(values = c(4,5,6,7))