I'm trying to produce a 3d plot with wireframe function or any other
package  in R . I want to show how z changes in response to x and y. But I
fail to produce  a 3d surfaceplot with a  wireframe command  which gives me
different  error messages.

## Generate data
x <- seq(from=0, to=100,by=1)
y <- seq(from=0, to=20,by=1)
df <- expand.grid(x=x,y=y)
df$z<-1/(1+(exp(-(-1.42+0.04*df$x+0.4*df$y))))
The command that I used is this one

require(lattice)
wireframe(df ~ x * y, df, shade = TRUE, aspect = c(1, 1),light.source =
c(10,10,10))

Any help and suggestion is highly appreciated!

	[[alternative HTML version deleted]]


