Create date_graph.r

Currently not working, but this is the R program which creates the simple date graph.