rCode for capacity loss vs shockSize in ggplot2 (see description)

You’ll need to install two R packages:
1.) grid (this allows us to make facet plots in ggplot2)
2.) ggplot2