grid.pattern(x=seq(1/6, 5/6, length=6), width=unit(1/8,"npc"), height=unit(0.5,"npc"),
motif.width=unit(10, "mm"), pattern=c(1:6), orientation=45, motif.alpha=0.5,
motif.cex=c(1, 0.5), motif.col=1:2, motif.fill=NA,
gp=gpar(fill="blue", lwd=2, alpha=0.5), clip=TRUE)
Run the code above in your browser using DataCamp Workspace