Update script

palette.r

+#!/usr/bin/env Rscript
+
 library("colorspace")
 
 n <- 11  # Number of colors in each palette
@@ -14,4 +16,4 @@ print(secondary_str)
 
 png(filename="plot.png", width=800, height=1000)
 specplot(rgb=TRUE, primary, secondary)
-dev.off()
+graphics.off()