source("valentine")
help(postscript)
 vi(valentine)
x11()
valentine()
help(x11())
help(x11)
help(x11)
?par
graphics.off()
x11()(
)
palette(rainbow(16))
valentine()
palette(rainbow(3))
valentine()
palette(default)
?palette
palette("default")
valentine()
palette(rainbow(6))
palette(rainbow(6)); valentine()
palette(rainbow(4)); valentine()
palette(rainbow(2)); valentine()
palette()
palette(rainbow(2)); valentine()
valentine(hcol=15,acol=2,msgcol=1,mcol=1)
graphics.off()
source("valentine")
graphics.off()
postscript(file="scr.ps")
valentine(hcol=15,acol=2,msgcol=1,mcol=1)
graphics.off()
postscript(file="scr.ps",horiz=F)
valentine(hcol=15,acol=2,msgcol=1,mcol=1)
graphics.off()
l
:q
q()
source("valentine.s")
graphics.off()
postscript(file="scr.ps",horiz=F)
valentine(hcol=15,acol=2,msgcol=1,mcol=1)
graphics.off()
q()
