par(bg = "#8D230F", col = "#8D230F") plot(c(100, 200), c(300, 450), type= "n", xlab = "", ylab = "", xaxt='n', yaxt='n', ann= FALSE)