I copied the cells out of the reference. It does seem to work in 10.3. I attach the notebook.
Thank you so much for the reply. Sorry about the late response, I am currently without internet. Perhaps the problem was that I was using Mathematica 9.