# Generate a 2-dim grid
seq(-1,1,length=50)->xgrid
seq(-1.5,.8,length=50)->ygrid
# Create a surface for x^2-y^2
make.surface(xgrid,ygrid,"xgrid**2-ygrid**2")->look
# Plot it various ways
image(look)
contour(look)
persp(look,theta=45)Run the code above in your browser using DataLab