Dear friends,
   The following is an example to explain my question. I want to get a
legend which will show the z-values according to different colors in image()
function.

x<-sort(runif(10))  #x-coordinates
y<-sort(runif(10))  #y-coordinates
z<-matrix(runif(100),nrow=10)  #attributes values
image(x,y,z,col=gray((6:3)/6))
# legend(x,y,legend=z,col=gray((6:3)/6)) #error. the colors should denote
different z-values, i want to get this legend.

 Thanks.

-- 
With Kind Regards,

oooO:::::::::
(..):::::::::
:\.(:::Oooo::
::\_)::(..)::
:::::::)./:::
::::::(_/::::
:::::::::::::
[***********************************************************************]
Zhi Jie,Zhang ,PHD
Tel:86-21-54237149
Dept. of Epidemiology,School of Public Health,Fudan University
Address:No. 138 Yi Xue Yuan Road,Shanghai,China
Postcode:200032
Email:epistat@gmail.com
Website: www.statABC.com
[***********************************************************************]
oooO:::::::::
(..):::::::::
:\.(:::Oooo::
::\_)::(..)::
:::::::)./:::
::::::(_/::::
:::::::::::::

	[[alternative HTML version deleted]]

