Great work thanks for the analysis.

Could you explain how you did the visualization of the data?
It looks pretty good. Is it done in R as well?