if (FALSE) {
ribbon3D(z = volcano, zlim= c(-100, 200), image = TRUE, plot = FALSE)
plotrgl(new = TRUE) # new window
cutrgl() # select region with left mouse
cutrgl() # second selection
uncutrgl() # original restored
}
Run the code above in your browser using DataLab