无法分配 geom_raster 大小向量的问题

Problem with geom_raster size vector cannot be allocated

我对 size vector cannot be allocatedgeom_raster 函数中反复出现的问题感到惊讶。这个问题发生在小数据集上,在我的例子中是 1559 次观察。我尝试做:

# Read the raster in data frame format
ras_df<-read.csv("https://raw.githubusercontent.com/Leprechault/trash/main/myraster_df.csv")
str(ras_df)
#'data.frame':  1559 obs. of  3 variables:
# $ cc       : num  65 85.6 82.7 85.6 89.4 ...
# $ longitude: num  -50.6 -50.6 -50.6 -50.6 -50.6 ...
# $ latitude : num  -24.2 -24.2 -24.2 -24.2 -24.2 ...

# Representation
ggplot() +
  geom_raster(data = ras_df , aes(x = longitude, y = latitude, fill = cc)) + 
  scale_fill_gradientn(name="Canopy cover",colours = rev(terrain.colors(100)))+
  xlab("longitude") + ylab("latitude") +
  theme_bw() + 
  coord_quickmap() +
  theme(panel.border = element_blank(), panel.grid.major = element_blank(),
panel.grid.minor = element_blank(), axis.line = element_line(colour = "black"),
text=element_text(size=16,  family="serif"),legend.position="bottom")
#
#
#Error: 20254.0 Gb size vector cannot be allocated

但如果我使用普通的 plot() 函数,则不会发生这种情况,但我会寻找更漂亮的表示形式,如 ggplot2 输出。一些带有一些解决方案的帖子对我来说效果不是很好(例如 SpatialPixelsDataFrame 转换和公差控制)。

拜托,我有什么解决办法吗?

错误附带的警告提供了信息

In addition: Warning messages:
1: Raster pixels are placed at uneven horizontal intervals and will be shifted. Consider using geom_tile() instead.
2: Raster pixels are placed at uneven vertical intervals and will be shifted. Consider using geom_tile() instead.

当数据具有虚假精度时会发生这种情况,因此 geom_raster 试图制作一个非常精细的网格,但会占用大量内存。

解决方法就是将数据四舍五入到适当的精度。

library(tidyverse)
ras_df <- ras_df %>% mutate(across(c(latitude, longitude), round, digits = 4))

然后情节就可以正常工作了。