ggplot2 でfunctiongeom_tileと一緒に使用する場合、美学のさまざまな制限を設定する方法は?facet_wrapfillscalesfree/free_y/free_xfacet_wrap
以下は、問題を示す例です。typedata.frameが異なるdfと、範囲zが大きく異なる可能性があります。同じ美的限界を使用するとfill、一部のパーツのz価値が非常に小さい一部のパネルは、詳細を見るのが難しくなります。
pp <- function (n,r=4) {
x <- seq(-r*pi, r*pi, len=n)
df <- expand.grid(x=x, y=x)
df$r <- sqrt(df$x^2 + df$y^2)
df$z <- cos(df$r^2)*exp(-df$r/6)
df
}
tmp <- pp(20)
tmp$type <- rep(1:4,each=nrow(tmp)/4)
tmp$z <- tmp$z*(10^(tmp$type))
ggplot(tmp,aes(x,y))+geom_tile(aes(fill=z))+facet_wrap(~type,scales="free")