Xkcd-style graphs in Mathematica