Why should ggplot2 have all the stateface fun? In this previous example, I did a quick example using the state font library with ggplot2 in R. In this example (see it here), we do a simple example with stateface in a base graphics plot. To make it even prettier, I added the svgPanZoom htmlwidget (see post).
See it live here.
Please reproduce and extend.
svgPanZoom(svgPlot({
plot(1:10,type="n")
points(1:10,pch="j",family="StateFace")
}))