Add plotting snippets in R