#详情课查看http://127.0.0.1:26615/library/fields/html/image.plot.html
#或者 ?image.plot
library(fields)
library(spam)
data( RCMexample)
image.plot( RCMexample$x, RCMexample$y, RCMexample$z[,,1])
x<- 1:20
y<- 1:15
z<- outer( x,y,"+")
zr<- range( c(z))
image.plot( zlim=zr, legend.only=TRUE, horizontal=TRUE, legend.mar=5)


雷达卡



京公网安备 11010802022788号







