# NOT RUN {
# A big image (may take a while to download):
img <- paste("http://eoimages.gsfc.nasa.gov/",
"images/imagerecords/73000/73909/",
"world.topo.bathy.200412.3x5400x2700.jpg", sep="")
t <- texture(img)
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab