rgb(0,0,0) returns 红色而不是黑色
rgb(0,0,0) returns red instead of black
出于某种原因,rgb(0,0,0) 为我返回了红色。 Mac 颜色选择器实用程序说它是阴影 rgb(248, 118, 109)。我已经正确设置了 maxColorValue,但这对 rgb(0,0,0) 应该无关紧要。我不知道出了什么问题。我唯一能想到的是不知何故有一个 k 通道被搞砸了,但我没有在 rgb() 函数中找到它的选项。
library(tidyverse)
cars %>%
filter(speed < 5) %>%
mutate(time = dist / speed) %>%
group_by(time, dist, speed) %>%
ggplot(aes(x = dist, y = speed, fill = rgb(0,0,0))) +
geom_tile() +
facet_grid(~time)
Screenshot of the resulting graph
解决方案是将 fill = rgb() 从 ggplot(aes(rgb())) 移动到没有 aes 的 geom_tile() 。生成的代码如下所示:
library(tidyverse)
cars %>%
filter(speed < 5) %>%
mutate(time = dist / speed) %>%
group_by(time, dist, speed) %>%
ggplot(aes(x = speed, y = speed)) +
geom_tile(fill = rgb(0,0,0)) +
facet_grid(~time)
如果有人能够帮助我理解为什么我的原始代码不起作用以及为什么我不应该在 geom_tile 中使用 aes(fill) 将不胜感激。
出于某种原因,rgb(0,0,0) 为我返回了红色。 Mac 颜色选择器实用程序说它是阴影 rgb(248, 118, 109)。我已经正确设置了 maxColorValue,但这对 rgb(0,0,0) 应该无关紧要。我不知道出了什么问题。我唯一能想到的是不知何故有一个 k 通道被搞砸了,但我没有在 rgb() 函数中找到它的选项。
library(tidyverse)
cars %>%
filter(speed < 5) %>%
mutate(time = dist / speed) %>%
group_by(time, dist, speed) %>%
ggplot(aes(x = dist, y = speed, fill = rgb(0,0,0))) +
geom_tile() +
facet_grid(~time)
Screenshot of the resulting graph
解决方案是将 fill = rgb() 从 ggplot(aes(rgb())) 移动到没有 aes 的 geom_tile() 。生成的代码如下所示:
library(tidyverse)
cars %>%
filter(speed < 5) %>%
mutate(time = dist / speed) %>%
group_by(time, dist, speed) %>%
ggplot(aes(x = speed, y = speed)) +
geom_tile(fill = rgb(0,0,0)) +
facet_grid(~time)
如果有人能够帮助我理解为什么我的原始代码不起作用以及为什么我不应该在 geom_tile 中使用 aes(fill) 将不胜感激。