# NOT RUN {
local(envir=.PBSmodEnv,expr={
if (dev.cur()>1) {
oldpar=par(no.readonly=TRUE); on.exit(par(oldpar)) }
plot(0:10,0:10,type="n")
drawBars(x=1:9,y=9:1,col="deepskyblue4",fill="cyan",lwd=3)
})
# }
Run the code above in your browser using DataLab