library(AFM)
data(AFMImageOfAluminiumInterface)
saveSpplotFromAFMImage(AFMImageOfAluminiumInterface,
paste(tempdir(), "myFileWithoutLegend.png", sep="/"), 800,800, TRUE)
saveSpplotFromAFMImage(AFMImageOfAluminiumInterface,
paste(tempdir(), "myFileWithLegend.png", sep="/"), 800,800, FALSE)Run the code above in your browser using DataLab