png("i-want-this-filename.png")
plot(c(1,2,3))
cat("png_filename:i-want-this-filename.png\n")