问如何制作xkcd风格的图表？

显然，人们已经想出了如何在Mathematica和LaTeX中制作xkcd风格的图表。但我可以在R？GGPLOT2-ERS？geom_xkcd或theme_xkcd？

我猜在基础图形，par（xkcd = TRUE）？我该怎么做？

作为ggplot2中的第一个刺（如下图所示），将jitter参数添加到一行中会使手绘效果更好。所以 -

ggplot(mapping=aes(x=seq(1,10,.1), y=seq(1,10,.1))) + 

  geom_line(position="jitter", color="red", size=2) + theme_bw()

这是一个很好的例子 - 但轴和字体显得更加棘手。唯一的方法是把它们弄出来并用手画出来？有没有更优雅的解决方案？特别是在ggplot2中，新的主题系统中的element_line可以修改成抖动状的参数吗？