geom_tile 在 ggplot2 中返回空白图

Question

我正在尝试使用下面的代码绘制一个包含三列的数据集，但我得到一个空白图，轴上只有名称，谁能告诉我我做错了什么？

#rm(list=ls())
library(data.table)
library(wesanderson)
library(ggplot2)

exa <- fread("sample.csv", sep = "," ,header = T,  stringsAsFactors = FALSE)

pal <- wes_palette("Zissou1", 100, type = "continuous")
sp1<-ggplot(exa, aes(x=x, y=y, fill=z))+
geom_tile(show.legend = T)+
scale_fill_gradientn(colours = pal) + 
  scale_x_discrete(expand = c(0, 0)) +
  scale_y_discrete(expand = c(0, 0)) 
sp1

数据：

exa <- structure(list(x = c(0.457744, 0.492325, 0.49948, 0.471712, 0.504126, 
0.505528, 0.516318, 0.521419, 0.518354, 0.523001, 0.527301, 0.566585, 
0.411753, 0.427226, 0.446747, 0.43778, 0.432248, 0.444912, 0.462414, 
0.456952, 0.443462, 0.420683, 0.392057), y = c(25.69908, 25.65119, 
25.8332, 23.88982, 22.41502, 22.27553, 23.05898, 24.20714, 25.23666, 
25.35443, 25.78347, 27.20575, 20.94434, 21.62892, 22.61483, 22.49146, 
23.38523, 24.46414, 25.8023, 26.63754, 27.40164, 27.45981, 27.97814
), z = c(29.75408, 29.02752, 28.43744, 27.98952, 27.62504, 27.32658, 
27.04928, 26.77825, 26.53036, 26.28481, 26.04137, 25.80254, 28.5918, 
27.81994, 27.44201, 27.15059, 26.83333, 26.54576, 26.31531, 26.12999, 
25.88431, 25.65788, 25.47488)), class = "data.frame", row.names = c(NA, 
-23L))

Answer 1

好吧，正如其他人所说，这可能不是用图块表示数据的首选方式，而是使用 geom_point。在这种情况下，这是有效的方法：

ggplot(exa, aes(x,y,color=z)) +
  geom_point(size=3) +
  scale_color_gradientn(colors = pal)

如果您仍然想使用磁贴，就像其他人提到的那样，您看不到磁贴，因为它们太小了。您可以通过指定 width= 和 height= 来放大它们。由于 x 轴和 y 轴的比例不同，如果您想要正方形瓷砖，则不能指定相同的数字。为此，您可以使用一些'o 数学来为您做这件事。这是有效的方法：

w= 0.02 * (max(exa$x)-min(exa$x))
h= 0.02 * (max(exa$y)-min(exa$y))

ggplot(exa, aes(x,y,fill=z)) +
  geom_tile(width=w, height=h) +
  scale_fill_gradientn(colors = pal)

顺便说一句 - 由于地块的纵横比，那里的瓷砖仍然不是正方形。

geom_tile 在 ggplot2 中返回空白图

geom_tile in ggplot2 returning blank plot

r

ggplot2

geom-tile