Simple Rscript plots cov. acc. ref.

Might add a derivative plot