Added Problem 16

This one was a redo in R.  Originally, I did it in Python.