1

我似乎无法使用 color brewer 用连续值填充箱线图，而且我知道它必须只是某处的简单语法交换，因为我可以根据连续值调整框的轮廓。这是我正在使用的数据：

data <- data.frame(
    value = sample(1:50),
    animals = sample(c("cat","dog","zebra"), 50, replace = TRUE),
    region = sample(c("forest","desert","tundra"), 50, replace = TRUE)
)

我想制作一个按中值“值”排序的镶板箱线图，每个框的颜色填充深度随着“值”的增加而增加（我知道这是多余的，但为了示例，请耐心等待）

（排序数据）：

orderindex <- order(as.numeric(by(data$value, data$animals, median)))
data$animals <- ordered(data$animals, levels=levels(data$animals)[orderindex])

如果我用面板创建箱线图，我可以调整轮廓的颜色：

library(ggplot2)
first <- qplot(animals, value, data = data, colour=animals)
second <- first + geom_boxplot() + facet_grid(~region)
third <- second + scale_colour_brewer()
print(third)

但我想做我对轮廓所做的事情，而是填充每个框（所以每个框随着“值”的增加而变暗）。我认为这可能是将“scale_colour_brewer()”参数放在 geom_boxplot 的美学参数中的问题，即

second <- first + geom_boxplot(aes(scale_colour_brewer())) + facet_grid(~region)

但这似乎并没有奏效。我知道这是“scale_colour_brewer”参数的定位问题；我只是不知道它去了哪里！

（这里有一个类似的问题，但这不是我要找的，因为盒子的颜色不会沿着光谱/梯度增加一些连续值；看起来这些值基本上是因素：将颜色添加到boxplot - “提供给离散比例的连续值”错误，以及带有汽车包的 ggplot 站点上的示例： http ://docs.ggplot2.org/0.9.3.1/geom_boxplot.html在我设置时似乎不起作用“填充”到“值”......我收到错误：单位错误（tic_pos.c，“mm”）：'x'和'units'必须具有长度> 0））

4

1 回答 1

5

如果您需要为箱线图设置填充，则不要color=animals使用fill=animals 并以相同的方式替换scale_color_brewer()为scale_fill_brewer().

qplot(animals, value, data = data, fill=animals)+ 
  geom_boxplot() + facet_grid(~region) + scale_fill_brewer()

在此处输入图像描述

于 2013-11-02T16:01:31.037 回答