ggplot2图例颜色渐变调整

在以下代码中，我想更改图例的各个方面，以便“plot_size”中表示“log10_p_value”的颜色渐变。ggplot2图例颜色渐变调整

所以白色气泡代表“plot_size”也表示“log10_size”

的数据可以在这里装载的颜色：

one.data <- 
    structure(list(plot_X = c(5.902, 1.184, 5.354, -3.513, 2.183, 
          2.217, -4.548, 6.466, -7.38, -6.19, 
          -6.374, 2.294, -3.653), 
       plot_Y = c(3.903, 7.13, -3.64, -5.64, 1.534, -4.031, 
          5.709, 0.066, 0.531, -3.234, 2.502, 6.686, 6.26), 
       plot_size = c(7.284, 5.413, 7.612, 4.725,5.633, 5.232, 
           4.547, 6.474, 5.567, 6.277, 6.874, 5.277, 4.394), 
       log10_p_value = c(-2.5229, -2.1549, -1.4949, -3, -1.5376, 
            -1.3565, -2.5229, -1.5229, -1.4949, -2.1549, 
            -1.3665, -2.1549, -1.3565)), 
      row.names = c(NA, 13L), 
      class = "data.frame", 
      .Names = c("plot_X", "plot_Y", "plot_size", "log10_p_value"))

生成的情节中的代码是：

p1 <- 
    ggplot(one.data 
     , aes(plot_X 
       , plot_Y 
       , fill = log10_p_value 
       , size = plot_size)) + 
    geom_point(
    alpha = 0.6 
    , shape = 21) + 
    scale_size(range=c(0, 30)) + 
    scale_fill_gradientn(colours = c("blue", "green", "yellow", "red")) + 
    theme_bw() + 
    coord_cartesian(xlim = range(one.data$plot_X) + diff(range(one.data$plot_X))*c(-0.1, 0.1) 
        , ylim = range(one.data$plot_Y) + diff(range(one.data$plot_Y))*c(-0.1, 0.1)) 


p1

来源

2017-02-09 Fraser Kennedy

颜色和形状是独立的美学，一个是离散的，一个是连续的。你想要什么输出？我不清楚你认为正确的事情是什么。 – MrFlick

什么不工作？ –

谢谢马克，你一直很有帮助。非常感谢。 –

你只是想改变t他用颜色标尺中的颜色填充plot_size图例？

如果是这样，这将工作：

p1 + guides(size = guide_legend(override.aes = list(fill = "orange", alpha = 0.6)))

产生这种

这仅仅是在骑默认审美为传说（通常是一个“安全”的价值以避免与其他美学混淆）。

你可以让他们每个人是不同的充颜色，但是这是一个非常非常糟糕的主意，因为颜色不符合剧情大小你想要的：

p1 + guides(size = guide_legend(override.aes = list(fill = c("blue", "green", "red"), alpha = 0.6)))

来源

2017-02-10 19:06:53

ggplot2图例颜色渐变调整

回答

相关问题