Work on issue #4 Pass R CMD check