R 为什么我的ggplot geom_瓷砖传奇比我想要的要高？

因此，我正在为一些数据创建一个热图，并使其显示每周按小时和天数累计记录的车辆数量。然而，当我绘制地图时，图例似乎不起作用，因此，瓷砖不会上升到“最暗的红色阴影”。有人知道发生了什么事吗？谢谢各位:

Hourplus <- c(Hour, Hour, Hour, Hour, Hour, Hour, Hour, Hour)
facetgrid <- data.frame(DayofWeek, Totals5, Totals6, Totals3, Totals4, Totals1, Totals2, Totals7, Totals8)
names(facetgrid) <- c("DayofWeek", "Marine Dr NB", "Marine Dr SB", "Carman NB", "Carman SB", "Glisan NB", "Glisan SB", "Stafford NB", "Stafford SB")


facetgrid <- melt(facetgrid)
facetgrid$DayofWeek <- factor(facetgrid$DayofWeek, levels=c("Monday", "Tuesday", "Wednesday", "Thursday", "Friday", "Saturday", "Sunday"))
facetgrid
levels(facetgrid$DayofWeek) <- c("M","Tu","W","Th","F","Sa","Su")
gg <- ggplot(facetgrid, aes(x=Hourplus, y=DayofWeek, fill=value)) + geom_tile(color="white", size=0.1) + facet_wrap(~variable, ncol = 2, scales='free')
gg <- gg + coord_equal()
gg <- gg + labs(x=NULL, y=NULL, title ="May 2017: Volume of Vehicles Greater than 20ft in Length")
gg <- gg + theme_tufte()
gg <- gg + theme(plot.title=element_text(hjust=0.5))
gg <- gg + theme(axis.ticks=element_blank())
gg <- gg + theme(axis.text=element_text(size=7))
gg <- gg + theme(legend.title=element_text(size=8))
gg <- gg + theme(legend.text=element_text(size=6))
gg <- gg + scale_fill_gradient(low = "white",high = "red", name="Volume")
gg <- gg + scale_x_continuous(breaks=seq(0,24,4), limits=c(0,25))
ggsave("8stationsvol.png", height =8, width = 12)

HourplusGgplot确实为大多数连续性质的刻度添加了“摆动”空间，如X轴和Y轴。
要设置严格（或自定义）限制，请在“比例\填充\梯度”中使用函数“限制”。在你的情况下，给它一个有下限和上限的向量

gg + scale_fill_gradient(low = "white",
      high = "red",
      name="Volume",
      limits = c(min(facetgrid$value), max(facetgrid$value)))

Ggplot确实为大多数连续性质的比例增加了“摆动”空间，就像X轴和Y轴一样。
要设置严格（或自定义）限制，请在“比例\填充\梯度”中使用函数“限制”。在你的情况下，给它一个有下限和上限的向量

gg + scale_fill_gradient(low = "white",
      high = "red",
      name="Volume",
      limits = c(min(facetgrid$value), max(facetgrid$value)))

我可以建议从旧的红色/白色调色板切换到绿色调色板吗？在白色背景上使用From
low=“white”
似乎不是一个好主意。谢谢你的建议，但我的雇主希望这样。我现在真的只是想解决这个问题。我能建议你从老式的红/白调色板切换到绿色调色板吗？在白色背景上使用From
low=“white”
似乎不是一个好主意。谢谢你的建议，但我的雇主希望这样。我现在真的只是想解决这个问题