※ 引述《dreler1 (....)》之铭言：
: [问题类型]:
: 程式咨询(我想用R 做某件事情，但是我不知道要怎么用R 写出来)
: [软件熟悉度]:
: 使用者(已经有用R 做过不少作品)
: 使用 filled.contour plot，
: filled.contour(lon_3, lat, annual_data_LTO_3,
: plot.axes={axis(1,at=seq(-180,180,by=30),
: labels=seq(-180,180,by=30));
: axis(2,at=seq(-90,90,by=30),
: labels=seq(-90,90,by=30));
: par(usr=c(-180,180,-90,90));map(add=T)},
: xlab="LON",ylab="LAT",
: key.title = title(main = "absdiff \n O3 \n (ppbv)"),
: key.axes = axis(4,at=seq(0.,0.6,by=0.1),
: labels=seq(0.,0.6,by=0.1)))
: 例如说我有三张图 z range = 0-0.6, 0-0.8, 0-1.2
: 我要怎么让 color bar 的 min: max 还有 间距一样
: 我尝试使用 key.axes 感觉好像不对
: 使用 nlevel 又一直出错，看不太懂怎么写
: 感谢
xy <- expand.grid(1:20, 1:20)
z1 <- matrix(xy[,1] + xy[,2], 20)
z4 <- matrix(2*xy[,1] + 2*xy[,2], 20)
filled.contour(x = 1:20, y = 1:20, z = z1, zlim = c(0, 80))
filled.contour(x = 1:20, y = 1:20, z = z2, zlim = c(0, 80))