Simple illustration added and stub for R script.