Attempted chart...
Completed data merge in R