facet_wrap不会在构面级别拆分用于填充geom_point的数据

Question

我正在使用facet_wrap函数和geom_point为不同的变量构建“热图”。每个点的颜色（填充）应相对于每个变量的值。取而代之的是，填充颜色会占用整个data.frame，而与变量无关，而我最终会得到错误的填充颜色。

我的data.frame具有类似“融化函数”的结构，这意味着我的变量在单个列下（colname =“ wellcolor”）。 facet_wrap拆分每个变量并很好地显示热图。但是，相对于值（colname = Well_N）的填充颜色采用整个数据框中的最大值和最小值，而不是所需变量中的最小值和最大值。

p <- ggplot(MyMap, aes(y=y,x=x, label=Well_N)) + 
  geom_point(shape=22,  aes(fill = as.numeric(MyMap$Well_N)), 
             size =32*(12/COLUMN),
             show.legend = FALSE)  +
  facet_wrap(~wellcolor, ncol = 1,  scales = "free", shrink = FALSE)

我想对MyMap $ well_N进行拆分，以便填充颜色反映在构面中显示的变量的值（相对于最小值和最大值）。